This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A184858 #7 Mar 30 2012 18:57:17 %S A184858 2,4,5,7,9,11,12,13,15,16,18,20,22,23,26,28,29,30,32,33,34,36,39,42, %T A184858 43,44,45,46,47,48,49,50,54,55,60,61,64,65,66,70,72,73,74,75,77,78,79, %U A184858 80,81,83,84,85,87,88,89,90,92,93,94,95,96,97,99,100,101,103,104,105,106,108,109,110,111,112,115,117,118,119,120,121,122,123,124,125,128,129,132,133,134,137,138,139,140,141,142,144,148,149,150,151,152,154,156,157,160,161 %N A184858 Numbers m such that prime(m) is of the form floor(k*e/(e-1)); complement of A184855. %e A184858 See A077545. %t A184858 PrimePi[Select[Floor[Range[1000] E/(E-1)], PrimeQ]] %Y A184858 Cf. A077545, A184855. %K A184858 nonn %O A184858 1,1 %A A184858 _Clark Kimberling_, Jan 23 2011