|
%I #13 Jul 31 2019 16:30:05
%S 12,16,18,22,28,59,60,71,80,81,91,101,103,106,157,158,234,243,256,257,
%T 261,273,283,284,286,288,291,301,304,305,306,309,312,313,321,322,324,
%U 327,333,343,347,348,354,355,362
%N Positions of 4's in the decimal expansion of (1+sqrt(5))/2.
%H G. C. Greubel, <a href="/A054290/b054290.txt">Table of n, a(n) for n = 1..10000</a>
%t Flatten[Position[RealDigits[GoldenRatio, 10, 500][[1]], 4]] (* _G. C. Greubel_, Jul 31 2019 *)
%Y Cf. A001622.
%K nonn,base
%O 1,1
%A _Simon Plouffe_, Feb 20 2000
|
