A126802 Numbers n =d1+10d2+100d3+...+10^p dp such that "prime(1)*d1+prime(2)*d2+...+prime(p)*dp" is prime.
1, 10, 11, 12, 14, 15, 17, 18, 31, 32, 34, 35, 37, 51, 52, 54, 57, 58, 71, 74, 75, 78, 91, 92, 95, 97, 98, 100, 101, 103, 104, 106, 107, 109, 120, 121, 123, 124, 126, 129, 140, 141, 143, 146, 147, 160, 163, 164, 167, 169, 180, 181, 184, 186, 187, 189, 210, 212, 213
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
Maple
filter:= proc(n) local L,i; L:= convert(n,base,10); isprime(add(L[i]*P[i],i=1..nops(L))); end proc: select(filter, [$1..100]); # Robert Israel, May 07 2020
Formula
For example 387 gives 7*2+8*3+3*5=53, a prime.
Comments