OFFSET
1,4
COMMENTS
EXAMPLE
a(4) = 10 - 1 = 9.
a(5) = 14 - 5 = 9.
MAPLE
read("transforms") :
A206011 := proc(n)
s := A001358(n) ;
s -digsum(s) ;
end proc: # R. J. Mathar, Sep 14 2012
MATHEMATICA
#-Total[IntegerDigits[#]]&/@Select[Range[200], PrimeOmega[#]==2&] (* Harvey P. Dale, Nov 24 2022 *)
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Jonathan Vos Post, Feb 02 2012
STATUS
approved