A167711 Numbers such that sum of digits is one more than a prime.

3, 4, 6, 8, 12, 13, 15, 17, 21, 22, 24, 26, 30, 31, 33, 35, 39, 40, 42, 44, 48, 51, 53, 57, 59, 60, 62, 66, 68, 71, 75, 77, 80, 84, 86, 93, 95, 99, 102, 103, 105, 107, 111, 112, 114, 116, 120, 121, 123, 125, 129, 130, 132, 134, 138, 141, 143, 147, 149, 150, 152, 156, 158

Offset: 1

Author

Juri-Stepan Gerasimov, Nov 10 2009

Keywords

• nonn
• base

Examples

			12 belongs to this sequence because 1+2-1=2 is prime.
		

Crossrefs

Cf. A007953, A008864, A166567.

Programs

Mathematica

Select[Range[158],PrimeQ[Total[IntegerDigits[#]]-1] &] (* Stefano Spezia, Apr 17 2023 *)

Extensions

Edited by Charles R Greathouse IV, Nov 12 2009