|
| |
|
|
A071255
|
|
a(1) = 2, a(n+1) = a(n)-th squarefree number.
|
|
3
| |
|
|
2, 3, 5, 7, 11, 17, 29, 46, 74, 119, 195, 319, 521, 859, 1407, 2315, 3810, 6267, 10303, 16942, 27862, 45822, 75381, 123998, 203969, 335507, 551886, 907818, 1493294, 2456374, 4040526, 6646389, 10932823, 17983831, 29582198, 48660745, 80043762
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Here 1 is not considered a squarefree number.
|
|
|
EXAMPLE
| a(2) = 3 and the third squarefree number is 5 hence a(3) = 5.
a(4) = 7 hence a(5) = 11 is the 7-th squarefree number (2,3,5,6,7,10,11...)
75381 is the 45822-nd squarefree number.
|
|
|
MATHEMATICA
| Needs["NumberTheory`NumberTheoryFunctions`"]; sqf = {}; Do[ If[ SquareFreeQ[n], sqf = Append[sqf, n]], {n, 2, 334000} ]; a[1] = 2; a[n_] := sqf[[ a[n - 1]]]; Table[ a[n], {n, 1, 26}].
a[1]=2; a[x_] := Part[t, a[x-1]] t=Flatten[Position[Table[Abs[MoebiusMu[w]], {w, 2, 35000}], 1]]+1; t1=Table[a[w], {w, 1, 21}]
|
|
|
CROSSREFS
| a(n)=A005117[a(n-1)], a(1)=2
Sequence in context: A127272 A113192 A077673 * A062294 A113016 A085136
Adjacent sequences: A071252 A071253 A071254 * A071256 A071257 A071258
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), May 22 2002
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com) and Labos E. (labos(AT)ana.sote.hu), Jun 07 2002
a(27)-a(37) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Oct 29 2010
|
| |
|
|
