|
|
A039781
|
|
Numbers k such that phi(k) is equal to A008473(k+1).
|
|
1
|
|
|
55, 174, 183, 341, 407, 1274, 5424, 6887, 18903, 22167, 27559, 53847, 66711, 68237, 77957, 78155, 91524, 132791, 133574, 138471, 149435, 191575, 220759, 274224, 339024, 413424, 432233, 493724, 505735, 543221, 684167, 694823, 703824, 711774, 747175, 883463
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
phi(174)=56, 175=5^2*7^1, (5+2)*(7+1)=56.
|
|
PROG
|
(PARI) b(n)=my(f = factor(n)); for (k=1, #f~, f[k, 1] = f[k, 1] + f[k, 2]; f[k, 2] = 1; ); factorback(f); \\ A008473
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|