login
A184797
Numbers k such that floor(k*sqrt(3)) is prime.
4
2, 3, 8, 10, 11, 17, 18, 24, 25, 31, 39, 41, 46, 48, 60, 62, 63, 76, 91, 100, 105, 112, 114, 115, 122, 129, 135, 138, 145, 152, 157, 160, 180, 181, 195, 202, 204, 212, 219, 225, 232, 242, 249, 250, 254, 256, 264, 270, 277, 284, 294, 301, 302, 316, 322, 329, 330, 339, 346, 347, 351, 354, 374, 381, 382, 389, 391, 399, 405, 420, 427, 429, 434, 444, 478, 479, 493, 495, 496, 509, 510, 524, 526, 531, 541, 547, 561, 568, 576, 583, 585, 590, 600
OFFSET
1,1
LINKS
EXAMPLE
See A184796.
MATHEMATICA
(See A184796.)
Select[Range[600], PrimeQ[Floor[# Sqrt[3]]]&] (* Harvey P. Dale, May 21 2017 *)
PROG
(PARI) is(n)=isprime(sqrtint(3*n^2)) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 22 2011
STATUS
approved