A086379 Numbers such that both 1 + sum of digits and 1 + product of digits are prime.

1, 2, 4, 6, 11, 22, 28, 66, 82, 112, 114, 121, 123, 129, 132, 136, 141, 147, 156, 163, 165, 174, 189, 192, 198, 211, 213, 219, 231, 235, 237, 253, 268, 273, 279, 286, 291, 297, 312, 316, 321, 325, 327, 334, 343, 345, 349, 352, 354, 361, 367, 369, 372, 376, 394

Offset

1,2

Links

Table of n, a(n) for n=1..55.

Mathematica

f[n_] := Block[{d = IntegerDigits[n]}, PrimeQ[1 + Plus @@ d] && PrimeQ[1 + Times @@ d]]; Select[ Range[410], f[ # ] &]

Crossrefs

Sequence in context: A093970 A333098 A107428 * A096460 A322051 A084353

Adjacent sequences: A086376 A086377 A086378 * A086380 A086381 A086382

Keyword

nonn,base

Author

Robert G. Wilson v, Sep 07 2003

Status

approved