login
Sorted positions of first appearances in the second differences of consecutive prime-powers inclusive (A000961).
11

%I #5 Oct 07 2024 14:06:16

%S 1,4,5,10,12,18,25,45,47,48,60,68,69,71,80,118,121,178,179,199,206,

%T 207,216,244,245,304,325,327,402,466,484,605,801,880,939,1033,1055,

%U 1077,1234,1281,1721,1890,1891,1906,1940,1960,1962,2257,2290,2410,2880,3150

%N Sorted positions of first appearances in the second differences of consecutive prime-powers inclusive (A000961).

%e The prime-powers inclusive (A000961) are:

%e 1, 2, 3, 4, 5, 7, 8, 9, 11, 13, 16, 17, 19, 23, 25, 27, 29, 31, 32, 37, 41, 43, ...

%e with first differences (A057820):

%e 1, 1, 1, 1, 2, 1, 1, 2, 2, 3, 1, 2, 4, 2, 2, 2, 2, 1, 5, 4, 2, 4, 2, 4, 6, 2, 3, ...

%e with first differences (A376596):

%e 0, 0, 0, 1, -1, 0, 1, 0, 1, -2, 1, 2, -2, 0, 0, 0, -1, 4, -1, -2, 2, -2, 2, 2, ...

%e with first appearances (A376653):

%e 1, 4, 5, 10, 12, 18, 25, 45, 47, 48, 60, 68, 69, 71, 80, 118, 121, 178, 179, 199, ...

%t q=Differences[Select[Range[100],#==1||PrimePowerQ[#]&],2];

%t Select[Range[Length[q]],!MemberQ[Take[q,#-1],q[[#]]]&]

%Y For first differences we had A057820, sorted firsts A376340(n)+1 (except first term).

%Y These are the sorted positions of first appearances in A376596.

%Y The exclusive version is a(n) - 1 = A376654(n), except first term.

%Y For squarefree instead of prime-power we have A376655.

%Y A000961 lists prime-powers inclusive, exclusive A246655.

%Y A001597 lists perfect-powers, complement A007916.

%Y A023893 and A023894 count integer partitions into prime-powers, factorizations A000688.

%Y A064113 lists positions of adjacent equal prime gaps.

%Y For prime-powers inclusive: A057820 (first differences), A376597 (inflections and undulations), A376598 (nonzero curvature).

%Y For second differences: A036263 (prime), A073445 (composite), A376559 (perfect-power), A376562 (non-perfect-power), A376590 (squarefree), A376593 (nonsquarefree), A376599 (non-prime-power).

%Y Cf. A053707, A069623, A093555, A174965, A251092, A333254, A361102.

%K nonn

%O 1,2

%A _Gus Wiseman_, Oct 06 2024