A099403 Numbers n such that the sum of the decimal portions of the square root and cube root of n is greater than 1.

3, 6, 7, 14, 15, 19, 20, 21, 22, 23, 24, 26, 34, 35, 43, 44, 45, 46, 47, 48, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 77, 78, 79, 80, 91, 92, 93, 94, 95, 96, 97, 98, 99, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 122, 123, 124, 140

Offset

1,1

Links

Table of n, a(n) for n=1..63.

Example

18 is not the sequence because .242641+.620741=.863382, which is < 1.
19 is in the sequence because .358899+.668402=1.027301, which is > 1.

Mathematica

Select[Range[150], Total[FractionalPart/@{Sqrt[#], Surd[#, 3]}]>1&] (* Harvey P. Dale, May 22 2013 *)

Crossrefs

Sequence in context: A349680 A255683 A127307 * A324726 A333379 A037015

Adjacent sequences: A099400 A099401 A099402 * A099404 A099405 A099406

Keyword

easy,nonn,base

Author

Gil Broussard, Nov 17 2004

Status

approved