%I #18 Apr 19 2022 03:33:05
%S 3,4,5,6,8,8,10,10,11,13,13,14,15,16,16,17,18,19,20,20,20,21,22,23,24,
%T 24,24,25,25,26,27,28,28,28,29,30,30,31,31,32,32,32,33,34,34,34,35,36,
%U 36,37,37,37,38,38,39,39,40,40,40,41,41,41,42,43,43,43,44
%N a(n) = floor(sqrt(6*prime(n))).
%F a(n) = A000196(A138636(n)). - _Michel Marcus_, Mar 19 2022
%t Table[Floor[Sqrt[6*Prime[k]]], {k, 50}]
%o (PARI) a(n) = sqrtint(6*prime(n)); \\ _Michel Marcus_, Mar 19 2022
%Y Cf. A000006, A000196, A138636.
%K nonn
%O 1,1
%A _Zak Seidov_, Feb 28 2022