A123153 a(n) = (n-th digit of Pi) times (the n-th prime number).

6, 3, 20, 7, 55, 117, 34, 114, 115, 87, 155, 296, 369, 301, 423, 159, 118, 183, 536, 284, 438, 158, 498, 356, 291, 303, 824, 321, 218, 791, 1143, 655, 0, 278, 1192, 1208, 628, 163, 1503, 1211, 179, 1086, 1719, 579, 1773, 1791, 633, 1561, 1135, 229, 0, 1195

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Albert Frank, International Contest Of Logical Sequences, 2002 - 2003. Item 5.

Albert Frank, Solutions of International Contest Of Logical Sequences, 2002 - 2003.

Example

a(1) = 3*2 = 6; a(2) = 1*3 = 3; a(3) = 4*5 = 20; ...

Mathematica

Module[{nn=60, pd}, pd=RealDigits[Pi, 10, nn][[1]]; Table[Prime[n]*pd[[n]], {n, nn}]] (* Harvey P. Dale, Sep 25 2014 *)

Prog

(Magma)
pi:=Pi(RealField(130));
A000796:= Reverse(Intseq(Floor(10^110*pi))); // Bruno Berselli's code
[A000796[n]*NthPrime(n): n in [1..100]]; // G. C. Greubel, Jul 18 2023
(SageMath)
x=numerical_approx(pi, digits=130)
b=[ZZ(i) for i in x.str(skip_zeroes=True) if i.isdigit()]
[nth_prime(n)*b[n-1] for n in range(1, 101)] # G. C. Greubel, Jul 18 2023

Crossrefs

Cf. A000796, A123152.

Sequence in context: A019069 A213752 A134410 * A276805 A185783 A288059

Adjacent sequences: A123150 A123151 A123152 * A123154 A123155 A123156

Keyword

nonn,base

Author

Herman Jamke (hermanjamke(AT)fastmail.fm), Oct 01 2006

Status

approved