|
| |
|
|
A097055
|
|
Numbers n such that the interval n^2 < x < (n+1)^2 contains at least one nonsquare perfect power A097054.
|
|
4
| |
|
|
2, 5, 11, 14, 15, 18, 22, 31, 36, 41, 45, 46, 52, 55, 58, 70, 76, 82, 88, 89, 90, 96, 103, 110, 117, 129, 132, 140, 148, 156, 164, 172, 181, 189, 198, 207, 225, 234, 243, 252, 262, 272, 279, 281, 291, 301, 311, 316, 322, 332, 353, 362, 364, 374, 385, 396, 401
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| T. D. Noe, Table of n, a(n) for n = 1..10000
|
|
|
EXAMPLE
| a(1)=2 because 2^2<2^3<3^2, a(2)=5: 5^2<3^3<2^5<6^2, a(3)=11: 11^2<5^3<2^7<12^2.
|
|
|
MATHEMATICA
| nn=1000^2; pp=Select[Union[Flatten[Table[n^i, {i, Prime[Range[2, PrimePi[Log[2, nn]]]]}, {n, 2, nn^(1/i)}]]], !IntegerQ[Sqrt[#]]&]; Union[Floor[Sqrt[pp]]] (* T. D. Noe, Apr 19 2011 *)
|
|
|
CROSSREFS
| Cf. A000290, A097054, A097056.
Sequence in context: A062572 A106283 A020629 * A191163 A026228 A003420
Adjacent sequences: A097052 A097053 A097054 * A097056 A097057 A097058
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Hugo Pfoertner (hugo(AT)pfoertner.org), Jul 21 2004
|
| |
|
|
