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.
n = 3 is a term because 2*10^3 + 81 = 2*1000 + 81 = 2000 + 81 = 2081 and 2081 is prime.
k = 7 is a member because: 3*10^7 + 71 = 30000071, which is prime.
isok(n) = isprime(3*10^n+71); \\ Michel Marcus, Jan 22 2017
n = 7 is in the sequence because 4*10^7 + 61 = 4*10000000 + 61 = 40000000 + 61 = 40000061, which is prime.
isok(n) = isprime(4*10^n+61); \\ Michel Marcus, Jan 22 2017
k = 4 is a member because: 5*10^4+51 = 5*10000+51 = 50000+51 = 50051, which is prime.
Select[Range[1, 1000], PrimeQ[5*10^# + 51] &] (* Julien Kluge, Dec 15 2016 *)
k = 4 is a term because 6*10^4 + 41 = 6*10000 + 41 = 60000 + 41 = 60041, which is a prime number.
n = 4 is a member because: 8*10^4+21 = 8*10000+21 = 80000+21 = 80021, which is prime.
n = 6 is a member because 9*10^6 + 11 = 9*1000000 + 11 = 9000011, which is prime.
Do[If[PrimeQ[9*10^n+11],Print[n]],{n,1,1300}] (* Zak Seidov, Sep 14 2006 *)
Comments