OFFSET
1,2
COMMENTS
First differs from A048103 in lacking 125.
First differs from A276078 in lacking 125.
First differs from A387181 in lacking 343.
First differs from A387576 in lacking 125.
The first sums of a sequence (a, b, c, d, ...) are (a+b, b+c, c+d, ...).
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
EXAMPLE
The prime indices of 10 are (1,3), 1-prepended (1,1,3), first sums (2,4), so 10 is in the sequence.
The prime indices of 12 are (1,1,2), 1-prepended (1,1,1,2), first sums (2,2,3), so 12 is not in the sequence.
MATHEMATICA
nn=100;
prix[n_]:=If[n==1, {}, Flatten[Cases[FactorInteger[n], {p_, k_}:>Table[PrimePi[p], {k}]]]];
firsums[c_]:=Table[c[[i]]+c[[i+1]], {i, Length[c]-1}];
Join@@Position[Table[firsums[Prepend[prix[n], 1]]-1, {n, nn}], _?(UnsameQ@@#&)]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Nov 07 2025
STATUS
approved
