%I A113747
%S A113747 1,11,31,61,99,147,207,271,349,439,529,643,751,867,1009,1143,1309,1471,
%T A113747 1651,1807,2019,2223,2439,2629,2851,3109,3363,3619,3879,4179,4429,4759,
%U A113747 5067,5329,5667,6013,6387,6723,7069,7407,7839,8283,8593,9039,9423,9889
%N A113747 Generalized Mancala solitaire (A002491); to get n-th term, start with
n and successively round up to next 10 multiples of n-1, n-2, ...,
1, for n>=1.
%t A113747 f[n_] := Fold[ #2*Ceiling[ #1/#2 + 9] &, n, Reverse@Range[n - 1]]; Array[f,
46]
%Y A113747 Cf. {k=-1..12} A000012, A002491, A000960 (Flavius Josephus's sieve),
A112557, A112558, A113742, A113743, A113744, A113745, A113746, A113747,
A113748; det. A113749.
%Y A113747 Sequence in context: A028877 A087394 A040162 this_sequence A125239 A062786
A090562
%Y A113747 Adjacent sequences: A113744 A113745 A113746 this_sequence A113748 A113749
A113750
%K A113747 nonn
%O A113747 1,2
%A A113747 Paul D. Hanna (pauldhanna(AT)juno.com) and Robert G. Wilson v (rgwv(AT)rgwv.com),
Nov 05 2005
|