login
A088412
A088258 indexed by A000142.
1
1, 2, 3, 4, 6, 7, 11, 12, 14, 27, 30, 32, 33, 37, 38, 41, 73, 77, 94, 116, 154, 166, 320, 324, 340, 379, 399, 427, 469, 546, 872, 974, 1477, 1963, 3507, 3610, 6380, 6917, 21480, 26951, 34790, 94550, 103040, 110059, 147855, 150209, 208003
OFFSET
1,2
COMMENTS
Union of A002981 and A002982, except 0. - Andrey Zabolotskiy, Aug 25 2016
LINKS
Hisanori Mishima, Primes near n!, Dec 2008.
FORMULA
a(n) is such positive k that A088258(n) = A000142(k).
MAPLE
select(t -> isprime(t!-1) or isprime(t!+1), [$1..600]); # Robert Israel, Aug 25 2016
MATHEMATICA
Select[Range[10^3], Or @@ PrimeQ@ {# - 1, # + 1} &[#!] &] (* Michael De Vlieger, Aug 25 2016 *)
CROSSREFS
Sequence in context: A158806 A184966 A018723 * A352192 A074177 A036470
KEYWORD
nonn
AUTHOR
Ray Chandler, Sep 29 2003
EXTENSIONS
Values 320 to 546 extracted from Mishima's table by R. J. Mathar, Mar 05 2010
More terms and correction of the initial term from Andrey Zabolotskiy, Aug 25 2016
STATUS
approved