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 A124206 #17 Sep 08 2022 08:45:28 %S A124206 12,140,212,315,455,512,560,660,687,807,947,1005,1007,1097,1128,1152, %T A124206 1182,1301,1427,1442,1491,1571,1755,1787,1860,2258,2346,2400,2616, %U A124206 2712,2757,2810,3015,3120,3233,3318,3431,3528,3756,3797,3827,3966,4038,4071 %N A124206 Numbers n such that 1 + n + n^3 + n^5 + n^7 + n^9 + n^11 + n^13 + n^15 + n^17 + n^19 + n^21 + n^23 + n^25 + n^27 + n^29 + n^31 + n^33 + n^35 + n^37 + n^39 + n^41 + n^43 + n^45 + n^47 + n^49 + n^51 is prime. %H A124206 Vincenzo Librandi, <a href="/A124206/b124206.txt">Table of n, a(n) for n = 1..250</a> %t A124206 Do[If[PrimeQ[1 + n + n^3 + n^5 + n^7 + n^9 + n^11 + n^13 + n^15 + n^17 + n^19 + n^21 + n^23 + n^25 + n^27 + n^29 + n^31 + n^33 + n^35 + n^37 + n^39 + n^41 + n^43 + n^45 + n^47 + n^49 + n^51], Print[n]], {n, 1, 2400}] %t A124206 Select[Range[6000], PrimeQ[Total[#^Range[1, 51, 2]] + 1] &] (* _Vincenzo Librandi_, Jun 28 2014 *) %o A124206 (Magma) [n: n in [0..5000] | IsPrime(s) where s is 1+&+[n^i: i in [1..51 by 2]]]; // _Vincenzo Librandi_, Jun 28 2014 %Y A124206 Cf. A049407, similar sequences listed in A244376. %K A124206 nonn,easy %O A124206 1,1 %A A124206 _Artur Jasinski_, Dec 13 2006