|
|
A067356
|
|
Numbers n such that prime(n+3)-(n+3)*tau(n+3)=prime(n)-n*tau(n) where tau(n) is the number of divisors of n A000005(n).
|
|
0
|
|
|
172, 206, 435, 542, 551, 575, 611, 626, 718, 759, 903, 955, 1102, 1238, 1495, 1711, 2009, 2379, 2385, 2482, 2572, 2815, 2874, 3018, 3103, 3222, 3225, 3802, 3899, 4055, 4335, 4342, 4430, 4439, 4545, 4682, 5154, 5183, 5467, 5594, 6036, 6058, 6202, 6231
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
ptQ[n_]:=Module[{n3=n+3}, Prime[n3]-(n3)DivisorSigma[0, n3]==Prime[n]- n*DivisorSigma[ 0, n]]; Select[Range[6300], ptQ] (* Harvey P. Dale, Jul 22 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|