|
%I #16 Jan 19 2020 11:20:53
%S 1,3,6,11,17,26,37,53,70,93,119,154,191,239,292,361,431,518,611,727,
%T 846,991,1145,1334,1525,1753,1992,2279,2571,2916,3277,3707,4138,4639,
%U 5157,5762,6373,7077,7804,8647,9493,10458,11449,12585,13730,15029,16363,17886,19411
%N a(n) = A030068(4n+1).
%H N. J. A. Sloane, <a href="/A169739/b169739.txt">Table of n, a(n) for n = 0..10000</a>
%F a(n) = A030067(4n-3). - _George Beck_, Jan 18 2020
%t f[1]=1; f[n_?EvenQ]:=f[n]=f[n/2]; f[n_?OddQ]:=f[n]=f[n-1]+f[n-2]; a[n_]:=f[2*n+1]; Table[a[n], {n, 0, 100, 2}] (* _Vincenzo Librandi_, May 27 2019 *)
%Y Cf. A030067, A030068, A169740.
%K nonn
%O 0,2
%A _N. J. A. Sloane_, May 02 2010
|
