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 A057822 #27 Aug 18 2024 04:17:03
%S A057822 5,11,59,419,232792559,442720643463713815199
%N A057822 Smaller of pair of twin primes whose average is lcm(1,...,m) for some m.
%C A057822 Known values of m such that lcm(1,...,m) is a twin prime mean value are as follows: {3, 4, 5, 6, 7, 19, 20, 21, 22, 47, 48}.
%C A057822 No more such primes occurs below m < 2000.
%C A057822 No more such primes occurs below m < 30000. - _Amiram Eldar_, Aug 18 2024
%e A057822 419 and 421 are twin primes, (419 + 421)/2 = 420 = lcm(1,2,3,4,5,6,7).
%t A057822 Select[FoldList[LCM, Select[Range[50], PrimePowerQ]] - 1, And @@ PrimeQ[# + {0, 2}] &] (* _Amiram Eldar_, Aug 18 2024 *)
%o A057822 (PARI) lista(nn=50) = {for (i=1, nn, if (isprimepower(i), if (isprime(p=lcm([2..i])-1) && isprime(p+2), print1(p, ", "));););} \\ _Michel Marcus_, Aug 25 2019
%Y A057822 Intersection of A057824 and {A049536(n)-2}.
%Y A057822 Cf. A003418, A051451, A057706.
%K A057822 nonn,hard
%O A057822 1,1
%A A057822 _Labos Elemer_, Nov 08 2000