A108026 Number of letters in the words formed by the digital recitation of sqrt(2) in the English language.
3, 4, 3, 4, 3, 3, 5, 4, 3, 3, 5, 5, 5, 4, 4, 4, 4, 4, 5, 5, 4, 3, 3, 5, 5, 5, 3, 4, 3, 4, 4, 3, 4, 5, 4, 5, 5, 4, 3, 4, 3, 5, 3, 5, 5, 4, 5, 5, 3, 4, 4, 5, 4, 5, 5, 3, 5, 3, 3, 5, 4, 5, 5, 5, 4, 4, 4, 5, 5, 3, 4, 5, 5, 4, 3, 3, 3, 4, 5, 4, 5, 5, 5, 4, 4, 5, 5, 5, 4, 5, 4, 5, 3, 5, 3, 4, 3, 4
Offset: 1
Programs
-
Mathematica
RealDigits[Sqrt[2], 10, 98][[1]] /. {0->4, 1->3, 2->3, 3->5, 5->4, 6->3, 7->5, 8->5, 9->4} (* James C. McMahon, Feb 19 2024 *)
-
PARI
readsqr2(n) = { local(x,a,d); default(realprecision,200); d=vector(10); a=vector(n); d[1]=4;d[2]=3;d[3]=3;d[4]=5;d[5]=4;d[6]=4;d[7]=3;d[8]=5;d[9]=5;d[10]=4; a=Vec(Str(sqrt(2))); print1(3","); for(x=3,n-1, y=floor(eval(a[x])); print1(d[y+1]",") ) }