|
%I #7 Jul 31 2015 20:54:36
%S 1,3,5,7,9,37,151,351,7739,17991
%N Padovan numbers with only odd digits.
%C Checked to a(10^5) which is a 12212 digit number and found no other terms. The even digited Padovan numbers are even fewer: 0, 2, 4, 28, 86 & 200. Probably both sequences are finite. - _Robert G. Wilson v_, May 04 2006.
%t a[0] = 1; a[1] = a[2] = 0; a[n_] := a[n] = a[n - 2] + a[n - 3]; lst = {}; Do[ If[ Union@ Join[{1, 3, 5, 7, 9}, IntegerDigits@a[n]] == {1, 3, 5, 7, 9}, Print@a[n]; AppendTo[lst, a[n]]], {n, 10^6}]; Union@lst (* _Robert G. Wilson v_, May 04 2006 *)
%Y Cf. A000931.
%K base,nonn
%O 1,2
%A Luc Stevens (lms022(AT)yahoo.com), May 03 2006
|
