|
| |
|
|
A144833
|
|
Lucas numbers containing equal number of odd and even digits.
|
|
1
| |
|
|
18, 29, 47, 76, 1364, 271443, 710647, 12752043, 20633239, 33385282, 54018521, 2537720636, 62113250390418, 1803423556807921, 221806434537978679, 667714778405043259651218, 31368381450514812615027603
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 54018521 is a Lucas number that contains equal number of odd and even digits.
|
|
|
MATHEMATICA
| fQ[n_] := Block[{id = IntegerDigits@ n}, Length@ Select[id, OddQ@ # &] == Length@ id/2]; lst = {}; Do[ lu = LucasL@ n; If[ fQ@ lu, AppendTo[lst, lu]], {n, 300}]; lst [From Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 24 2008]
|
|
|
CROSSREFS
| A000032, A144205, A144226
Sequence in context: A167333 A045000 A205871 * A032612 A151700 A154367
Adjacent sequences: A144830 A144831 A144832 * A144834 A144835 A144836
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Parthasarathy Nambi (PachaNambi(AT)yahoo.com), Sep 22 2008
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 24 2008
|
| |
|
|
