%I A154864
%S A154864 1,14,18,38,42,56,60,76,82,84,86,90,93,110,112,115,116,117,119,121,124,
%T A154864 138,141,142,143,144,147,148,150,152,153,154,172,178,192,194,195,208,
%U A154864 218,221,224,234,235,236,250,252,255,261,276,279,280,282,284,285,286
%N A154864 Nonprimes n such that largest digit of prime(n) = even.
%e A154864 If n=1=nonprime and 2=prime(1), then 2=even and 1=a(1). If n=14=nonprime
and 43=prime(14), then 3<4=even and 14=a(2). If 18=nonprime(18) and
61=prime(18), then 1<6=even and 18=a(3), etc.
%p A154864 A054055 := proc(n) max( op(convert(n,base,10))) ; end: isA154864 := proc(n)
RETURN(not isprime(n) and ( A054055(ithprime(n)) mod 2 ) = 0 ) ;
end: for n from 1 to 400 do if isA154864(n) then printf("%d,",n)
; fi; od: [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan
18 2009]
%Y A154864 Cf. A000040, A141468, A154767.
%Y A154864 Sequence in context: A051419 A000053 A079349 this_sequence A065343 A165228
A013649
%Y A154864 Adjacent sequences: A154861 A154862 A154863 this_sequence A154865 A154866
A154867
%K A154864 nonn
%O A154864 1,2
%A A154864 Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Jan 16 2009
%E A154864 36 replaced by 38. - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan
18 2009
|