A184799 Primes of the form floor(k*s), where s=(3+sqrt(3))/2.

2, 7, 11, 23, 37, 47, 59, 61, 73, 89, 97, 101, 113, 127, 137, 139, 149, 151, 163, 167, 179, 191, 227, 229, 241, 257, 269, 281, 283, 293, 307, 317, 331, 347, 359, 373, 383, 397, 409, 421, 449, 461, 463, 487, 499, 503, 541, 563, 577, 593, 617, 619, 631, 641, 643, 653, 683, 709, 719, 733, 757, 761

Offset: 1

Author

Clark Kimberling, Jan 22 2011

Keywords

• nonn

Examples

			See A184796.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A184796, A184800, A184801.

Programs

Maple

filter:= proc(p) local v, k;
  v:= p*(1-1/sqrt(3));
  k:= ceil(v);
  is((v-k+1)^2 > 1/3)
end proc:
select(filter, [seq(ithprime(i),i=1..200)]); # Robert Israel, May 04 2020

Mathematica

(See A184796.)