login
A173401
Numbers k such that A075526(k-1) = A054546(k).
1
1, 3, 4, 8, 11, 21, 29, 44, 53, 58, 61, 84, 105, 121, 149, 153, 179, 183, 213, 295, 308, 374, 461, 502, 535, 552, 609, 637, 659, 727, 730, 756, 850, 859, 865, 875, 885, 914, 1005, 1055, 1105, 1239, 1261, 1306, 1321, 1407, 1443, 1616, 1654, 1769, 1783, 1795, 1836
OFFSET
1,2
MAPLE
A008578 := proc(n) if n =1 then 1; else ithprime(n-1) ; end if; end proc:
A075526 := proc(n) A008578(n+2)-A008578(n+1) ; end proc:
A054546 := proc(n) if n <= 2 then op(n, [1, 3]) ; else A002808(n-1)-A002808(n-2) ; end if; end proc:
for n from 1 to 2000 do if A075526(n-1) = A054546(n) then printf("%d, ", n) ; end if; end do: # R. J. Mathar, Apr 24 2010
CROSSREFS
KEYWORD
nonn,less
AUTHOR
EXTENSIONS
Formula index corrected, a(14) corrected and sequence extended beyond a(14) by R. J. Mathar, Apr 25 2010
STATUS
approved