|
| |
|
|
A144967
|
|
Semiprimes n such that n + 1 is divisible by the sum of decimal digits of n.
|
|
1
| |
|
|
10, 14, 34, 65, 143, 215, 299, 362, 454, 458, 545, 655, 671, 689, 799, 917, 922, 923, 943, 1003, 1007, 1042, 1055, 1111, 1154, 1199, 1253, 1273, 1379, 1507, 1529, 1739, 1807, 1835, 1919, 1957, 2045, 2095, 2183, 2209, 2231, 2279, 2302, 2326, 2342, 2435
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 14 and 15 are semiprimes. 14+1 = 15 is divisible by 1+4 = 5, hence 14 is in the sequence; 15+1 = 16 is not divisible by 1+5 = 6, hence 15 is not in the sequence. [From Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Sep 29 2008]
|
|
|
MATHEMATICA
| Select[Range[5000], Sum[FactorInteger[ # ][[i, 2]], {i, 1, Length[FactorInteger[ # ]]}] == 2 && Mod[ # + 1, Plus @@ IntegerDigits[ # ]] == 0 &] [From Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Sep 29 2008]
|
|
|
CROSSREFS
| Cf. A001358 (semiprimes). [From Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Sep 29 2008]
Sequence in context: A164765 A116955 A192291 * A107126 A025122 A173684
Adjacent sequences: A144964 A144965 A144966 * A144968 A144969 A144970
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Sep 27 2008
|
|
|
EXTENSIONS
| Corrected and extended by Stefan Steinerberger (stefan.steinerberger(AT)gmail.com) and Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Sep 29 2008
|
| |
|
|
