login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Pentagonal numbers with only even digits.
2

%I #12 Feb 06 2021 08:52:55

%S 0,22,2262,2882,8400,8626,40262,80620,86280,224460,244622,288862,

%T 442002,468442,606426,866020,2000460,2628802,4028662,4624426,4640242,

%U 4666662,6664442,8044626,8268482,8602840,20622042,20800402,22024420,22428600,22440202,22486640,22626242

%N Pentagonal numbers with only even digits.

%H David A. Corneth, <a href="/A117990/b117990.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Table[n*(3*n - 1)/2, {n, 0, 10^4}], AllTrue[IntegerDigits[#], EvenQ] &] (* _Amiram Eldar_, Feb 06 2021 *)

%Y Intersection of A000326 and A014263.

%Y Cf. A117985.

%K nonn,base

%O 1,2

%A Luc Stevens (lms022(AT)yahoo.com), May 03 2006

%E a(1)=0 and a missing term inserted by _Amiram Eldar_, Feb 06 2021