OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
236 is in the sequence because 2 + 3 + 6 + 2*3*6 = 11 + 36 = 47 is prime.
MAPLE
A007953 := proc(n) add(d, d=convert(n, base, 10)) ; end proc:
A007954 := proc(n) mul(d, d=convert(n, base, 10)) ; end proc:
for n from 1 to 300 do if isA185300(n) then printf("%a, ", n) ; end if; end do: # R. J. Mathar, Feb 08 2011
PROG
(Magma) [n: n in [1..232] | IsPrime(&+Intseq(n)+&*Intseq(n))]; // Bruno Berselli, Aug 02 2012
(PARI) is(n)=my(d=digits(n)); isprime(vecsum(d)+vecprod(d)) \\ Charles R Greathouse IV, Jun 06 2017
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Michel Lagneau, Feb 03 2011
STATUS
approved