|
|
|
|
4, 4, 4, 6, 8, 8, 12, 12, 24, 16, 32, 24, 24, 24, 40, 48, 32, 64, 44, 48, 72, 54, 84, 60, 60, 64, 48, 72, 72, 64, 84, 132, 88, 96, 80, 120, 128, 80, 128, 160, 96, 120, 128, 96, 120, 160, 180, 120, 144, 120, 232, 128, 160, 252, 192, 216, 144, 272, 180, 184, 192, 160
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = phi(prime(n) + prime(n+1)).
|
|
MAPLE
|
|
|
MATHEMATICA
|
EulerPhi[Total[#]]&/@Partition[Prime[Range[70]], 2, 1] (* Harvey P. Dale, Mar 05 2013 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|