OFFSET
1,2
EXAMPLE
The terms together with their prime indices begin:
1: {}
4: {1,1}
9: {2,2}
12: {1,1,2}
18: {1,2,2}
24: {1,1,1,2}
34: {1,7}
47: {15}
60: {1,1,2,3}
79: {22}
117: {2,2,6}
178: {1,24}
198: {1,2,2,5}
206: {1,27}
215: {3,14}
244: {1,1,18}
MATHEMATICA
q=Differences[Select[Range[100], PrimePowerQ]];
Select[Range[Length[q]], !MemberQ[Take[q, #-1], q[[#]]]&]
CROSSREFS
For compression instead of sorted firsts we have A376308.
For run-lengths instead of sorted firsts we have A376309.
For run-sums instead of sorted firsts we have A376310.
The version for squarefree numbers is the unsorted version of A376311.
The unsorted version is A376341.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 22 2024
STATUS
approved