|
%I #8 Aug 28 2016 03:11:38
%S 1,2,4,7,9,17,19,32,34,42,44,82,84,92,94,157,159,167,169,207,209,217,
%T 219,407,409,417,419,457,459,467,469,782,784,792,794,832,834,842,844,
%U 1032,1034,1042,1044,1082,1084,1092,1094,2032,2034,2042,2044,2082,2084
%N Sequence S such that 1 is in S and if x is in S, then 5x-3 and 5x-1 are in S.
%C Subsequences include A047850, A083065.
%C First generation: 1
%C 2nd generation: 2, 4
%C 3rd generation: 7, 9, 17, 19
%C 4th generation: 32, 34, 42, 44, 82, 84, 92, 94
%C Does every generation contain p or 2p for some prime p?
%H G. C. Greubel, <a href="/A153776/b153776.txt">Table of n, a(n) for n = 1..1000</a>
%t nxt[n_] := Flatten[5 # + {-3, -1} & /@ n]; Union[Flatten[NestList[nxt, {1}, 5]]] (* _G. C. Greubel_, Aug 28 2016 *)
%Y Cf. A047850, A083065, A153773, A153775.
%K nonn
%O 1,2
%A _Clark Kimberling_, Jan 02 2009
|
