|
1, 11, 15, 25, 22, 30, 29, 41, 44, 41, 42, 54, 50, 55, 56, 85, 61, 78, 68, 76, 70, 73, 80, 94, 90, 93, 73, 92, 99, 112, 105, 104, 97, 104, 99, 139, 134, 125, 116, 126, 137, 149, 146, 137, 119, 140, 154, 182, 117, 167, 146, 149, 172, 157, 131, 161, 151, 166, 191, 224, 218, 190, 150, 294, 155, 205
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
If n = prime(k) is prime, a(n) = 3*prime(k)+1+A210934(k).
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MAPLE
|
spf:= proc(n) local t; add(t[1]*t[2], t=ifactors(n)[2]) end proc:
f:= proc(n) local a, b;
a:= spf(n);
b:= numtheory:-sigma(n);
a+b+spf(b)+numtheory:-sigma(a)
end proc:
map(f, [$1..100]);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|