The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A066003 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A066003

Sum of digits of 7^n.
(history; published version)

#25 by Charles R Greathouse IV at Thu Sep 08 08:45:04 EDT 2022

PROG

(MAGMAMagma) [ &+Intseq(7^n): n in [0..60] ];

Discussion

Thu Sep 08

08:45

OEIS Server: https://oeis.org/edit/global/2944

#24 by Michel Marcus at Sun Apr 19 02:53:31 EDT 2020

STATUS

reviewed

approved

#23 by Joerg Arndt at Sun Apr 19 02:53:05 EDT 2020

STATUS

proposed

reviewed

#22 by Joerg Arndt at Sun Apr 19 02:52:58 EDT 2020

STATUS

editing

proposed

#21 by Joerg Arndt at Sun Apr 19 02:52:52 EDT 2020

PROG

(PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) }

{ for (n=0, 1000, a=SumD(7^n); write("b066003.txt", n, " ", a) ) } \\ Harry J. Smith, Nov 06 2009

STATUS

proposed

editing

#20 by Michel Marcus at Sat Apr 18 11:54:22 EDT 2020

STATUS

editing

proposed

#19 by Michel Marcus at Sat Apr 18 11:54:19 EDT 2020

CROSSREFS

Cf. A000420 (7^n), A007953 (sum of digits).

STATUS

proposed

editing

#18 by F. Chapoton at Sat Apr 18 11:11:23 EDT 2020

STATUS

editing

proposed

#17 by F. Chapoton at Sat Apr 18 11:11:14 EDT 2020

PROG

(PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) } { for (n=0, 1000, a=SumD(7^n); write("b066003.txt", n, " ", a) ) } \\ _Harry J. Smith_, Nov 06 2009

{ for (n=0, 1000, a=SumD(7^n); write("b066003.txt", n, " ", a) ) } \\ Harry J. Smith, Nov 06 2009

STATUS

approved

editing

Discussion

Sat Apr 18

11:11

F. Chapoton: add line break in pari code

#16 by Joerg Arndt at Sun Mar 23 03:14:58 EDT 2014

STATUS

proposed

approved