PROG
(MAGMAMagma) [(n+1)^21 - n^21: n in [0..20]]; // G. C. Greubel, Feb 27 2018
(MAGMAMagma) [(n+1)^21 - n^21: n in [0..20]]; // G. C. Greubel, Feb 27 2018
proposed
approved
editing
proposed
q=21; lst={}; Do[AppendTo[lst, (n+1)^q-n^q], {n, 0, 4!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jan 23 2009 *)
(GAP) b:=21;; a:=n->(n+1)^b-n^b;; List([0..18], n->a(n)); # Muniru A Asiru, Feb 28 2018
proposed
editing
editing
proposed
b:=21: a:=n->(n+1)^b-n^b: seq(a(n), n=0..18); # Muniru A Asiru, Feb 28 2018
(GAP) b:=21;; a:=n->(n+1)^b-n^b;; List([0..18], n->a(n)); # Muniru A Asiru, Feb 28 2018
proposed
editing
editing
proposed
Column k=20 of A047969.
proposed
editing
editing
proposed
Cf. A010809 (n^21).