login
A062235
a(n) = prime(n)^2 - prime(n+1).
1
1, 4, 18, 38, 108, 152, 270, 338, 500, 810, 924, 1328, 1638, 1802, 2156, 2750, 3420, 3654, 4418, 4968, 5250, 6158, 6800, 7824, 9308, 10098, 10502, 11340, 11768, 12642, 15998, 17024, 18630, 19172, 22050, 22644, 24486, 26402, 27716, 29750, 31860
OFFSET
1,2
LINKS
FORMULA
a(n) = A001248(n) - A065091(n). - Elmo R. Oliveira, Mar 24 2023
MATHEMATICA
#[[1]]^2-#[[2]]&/@Partition[Prime[Range[50]], 2, 1] (* Harvey P. Dale, Mar 15 2015 *)
PROG
(PARI) { for (n=1, 1000, write("b062235.txt", n, " ", prime(n)^2 - prime(n + 1)) ) } \\ Harry J. Smith, Aug 03 2009
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Reinhard Zumkeller, Jun 29 2001
STATUS
approved