OFFSET
1,1
COMMENTS
Triangular numbers are 1653, 32131, 79401, ... - Ali Adams, Feb 04 2020
The next such terms are 173340627863131 and 1454987833022905581. - Giovanni Resta, Feb 04 2020
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
FORMULA
MATHEMATICA
Table[FromDigits[Join[IntegerDigits[n], IntegerDigits[Prime[n]]]], {n, 40}] (* Vincenzo Librandi, Apr 13 2019 *)
#[[1]]*10^IntegerLength[#[[2]]]+#[[2]]&/@Table[{n, Prime[n]}, {n, 50}] (* Harvey P. Dale, Oct 11 2024 *)
PROG
(Haskell)
a045532 n = read $ show n ++ show (a000040 n) :: Integer
-- Reinhard Zumkeller, Jul 08 2014
(Magma) [Seqint(Intseq(NthPrime(n)) cat Intseq(n)): n in [1..45]]; // Vincenzo Librandi, Apr 13 2019
(PARI) a(n) = eval(Str(n, prime(n))); \\ Michel Marcus, Apr 13 2019, simplified by M. F. Hasler, Feb 05 2020
(Python)
from sympy import prime
def a(n): return int(str(n) + str(prime(n)))
print([a(n) for n in range(1, 43)]) # Michael S. Branicky, Dec 23 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved