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 A319250 #21 May 02 2023 02:28:04 %S A319250 0,2,7,14,17,27,34,60,67,69,84,94,144,160,167,170,177,199,282,284,289, %T A319250 314,342,345,367,392,419,420,422,437,452,510,525,580,599,609,619,669, %U A319250 674,707,724,739,797,854,865,875,895,899,900,942,952,959,984,1004,1080 %N A319250 Numbers k such that 24k + 11 and 24k + 13 are a pair of twin primes in A001122. %C A319250 Numbers k such that 24k + 11 and 24k + 13 are both in A001122. See A319248 and A319249 for detailed information. %H A319250 Amiram Eldar, <a href="/A319250/b319250.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..405 from Jianing Song) %F A319250 a(n) = (A319248(n+1) - 11)/24 = (A319249(n+1) - 13)/24. %e A319250 11 and 13 are a pair of twin primes both having 2 as a primitive root, so 0 is a term. %e A319250 59 and 61 are a pair of twin primes both having 2 as a primitive root, so 2 is a term. %e A319250 Although 227 and 229 are a pair of twin primes, neither of them has 2 as a primitive root, so 9 is not a term. %t A319250 Select[Range[0, 1080], PrimeQ[24*# + 11] && PrimeQ[24*# + 13] && PrimitiveRoot[24*# + 11] == 2 && PrimitiveRoot[24*# + 13] == 2 &] (* _Amiram Eldar_, May 02 2023 *) %o A319250 (PARI) for(k=0, 1000, if(znorder(Mod(2,24*k+11))==24*k+10 && znorder(Mod(2,24*k+13))==24*k+12, print1(k, ", "))) %Y A319250 Cf. A001122, A002822, A319248, A319249. %K A319250 nonn %O A319250 1,2 %A A319250 _Jianing Song_, Sep 15 2018