login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A065965 Numbers n such that n divides A039916(n). 1
1, 2, 3, 9, 18, 21, 43, 59, 74, 557, 8292, 31898, 68595, 530152, 599960, 724192, 1373197, 1452846, 5125588, 5776688 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Next term, if it exists, is greater than 10000000. - Vaclav Kotesovec, Oct 06 2014

LINKS

Table of n, a(n) for n=1..20.

EXAMPLE

A039916(9) = 141592653 = 9*15732517, so 9 is a term of this sequence.

MAPLE

for n from 1 do

    if modp(A039916(n), n) = 0 then

        print(n);

    end if;

end do: # R. J. Mathar, Oct 04 2014

MATHEMATICA

picif=RealDigits[Pi-3, 10, 100000][[1]]; t=0; Do[t=10*t+picif[[j]]; If[Divisible[t, j], Print[j]], {j, 1, Length[picif]}] (* Vaclav Kotesovec, Oct 06 2014 , 7 CPU hours with 10000000 *)

PROG

(PARI) a065965(m, n) = {local(pr, pi, k); pr=default(realprecision, 1); default(realprecision, n); p=Pi-3; for(k=m, n, if(truncate(p*10^k)%k==0, print1(k, ", "))); default(realprecision, pr); }

a065965(1, 2^15)

CROSSREFS

Cf. A039916.

Sequence in context: A295965 A034467 A234646 * A296052 A108827 A298347

Adjacent sequences:  A065962 A065963 A065964 * A065966 A065967 A065968

KEYWORD

base,nonn,more

AUTHOR

Jason Earls, Dec 08 2001

EXTENSIONS

One more term from Klaus Brockhaus, Dec 10 2001

Four more terms a(13)-a(16) from Jeff Heleen, Sep 28 2014

Terms a(17)-a(20) from Vaclav Kotesovec, Oct 06 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 25 12:11 EDT 2019. Contains 321470 sequences. (Running on oeis4.)