cp's OEIS Frontend

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.

A198776 Primes from merging of 2 successive digits in decimal expansion of Euler-Mascheroni constant.

This page as a plain text file.
%I A198776 #20 Mar 19 2020 18:32:05
%S A198776 53,2,43,31,59,59,23,59,5,67,23,67,67,67,47,29,17,67,31,47,7,5,83,41,
%T A198776 17,73,97,23,53,53,3,37,29,37,73,37,73,37,67,73,79,59,47,73,3,67,53,
%U A198776 23,31,17,61,11,11,19,7,79,47,79,37,5,2,29,13,47,61,2,29
%N A198776 Primes from merging of 2 successive digits in decimal expansion of Euler-Mascheroni constant.
%C A198776 Leading zeros are permitted, so some terms may be less than 2 digits in length.
%H A198776 Vincenzo Librandi, <a href="/A198776/b198776.txt">Table of n, a(n) for n = 1..1000</a>
%t A198776   egp[len_]:=Module[{egterms=FromDigits/@Partition[RealDigits[EulerGamma, 10, 1000][[1]],len,1]},Select[egterms,PrimeQ[#]&]];egp[2]
%t A198776 Select[FromDigits/@Partition[RealDigits[EulerGamma,10,500][[1]],2,1],PrimeQ] (* _Harvey P. Dale_, Mar 19 2020 *)
%Y A198776 Cf. A103773, A103789, A103793, A103808, A103809, A103810, A103811,
%Y A198776 A103812, A104824, A104825, A104826, A104843, A104844, A104845,
%Y A198776 A104846, A104847, A104848, A104849, A104850, A104936, A198161, A198162,
%Y A198776 A198163, A198164, A198165, A198166, A198167, A198168, A198169,
%Y A198776 A198170, A198171, A198172, A198173, A198175, A104851, A198177,
%Y A198776 A198777, A198778, A198779, A198780, A198781, A198782,
%Y A198776 A198783, A198784.
%K A198776 nonn,base
%O A198776 1,1
%A A198776 _Harvey P. Dale_, Oct 29 2011