OFFSET
1,1
EXAMPLE
12 belongs to this sequence because 1+2-1=2 is prime.
MATHEMATICA
Select[Range[158], PrimeQ[Total[IntegerDigits[#]]-1] &] (* Stefano Spezia, Apr 17 2023 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Juri-Stepan Gerasimov, Nov 10 2009
EXTENSIONS
Edited by Charles R Greathouse IV, Nov 12 2009
STATUS
approved