[go: up one dir, main page]

login
A099403
Numbers n such that the sum of the decimal portions of the square root and cube root of n is greater than 1.
0
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
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
KEYWORD
easy,nonn,base
AUTHOR
Gil Broussard, Nov 17 2004
STATUS
approved