Belphegor Number

Author

Eric W. Weisstein
January 24, 2017

This notebook downloaded from http://mathworld.wolfram.com/notebooks/IntegerSequences/BelphegorNumber.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/BelphegorNumber.html.

©2017 Wolfram Research, Inc. except for portions noted otherwise

Compute

A232449

Belphegor1[n_]:=FromDigits[Join[{1},ConstantArray[0,n],{6,6,6},ConstantArray[0,n],{1}]]

Table[Belphegor1[n],{n,0,5}]

Belphegor[n_]:=(10^(2n+4))+666 (10^(n+1))+1

Table[Belphegor[n],{n,0,5}]