|
|
A141560
|
|
Nonprimes of form (prime(n)-r(n)), where A141468(n)=r(n)=n-th nonprime and prime(n)=n-th prime.
|
|
0
|
|
|
1, 1, 4, 9, 14, 15, 21, 22, 25, 34, 35, 40, 50, 55, 62, 65, 65, 68, 69, 86, 91, 91, 100, 106, 111, 118, 123, 124, 133, 133, 135, 136, 147, 158, 161, 161, 164, 169, 169, 177, 182, 187, 192, 200, 201, 209, 222, 225, 226, 246, 255, 256, 259, 264, 275, 280, 287, 296
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
MATHEMATICA
|
Module[{nn=200, np, len}, np=Select[Range[0, nn], !PrimeQ[#]&]; len= Length[ np]; Select[ #[[1]]-#[[2]]&/@Thread[{Prime[Range[len]], np}], !PrimeQ[ #]&]] (* Harvey P. Dale, Oct 15 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,less
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|