|
|
A219325
|
|
Positive integers n that are equal to the determinant of the circulant matrix formed by the binary digits of n.
|
|
6
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
Binary digits of 17298 are [1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 1, 0]. The 15 X 15 circulant matrix formed by their circular right rotations has determinant equal to 17298.
|
|
MATHEMATICA
|
dcmQ[n_]:=Module[{idn2=IntegerDigits[n, 2]}, Det[Table[RotateRight[idn2, k], {k, Length[idn2]}]]==n]; Select[Range[3*10^6], dcmQ] (* This program generates the first 6 terms of the sequence. To generate a(7) and a(8), increase the Range constant to 3451*10^7, but the program will take a long time to run. *) (* Harvey P. Dale, Jul 30 2019 *)
|
|
CROSSREFS
|
Cf. A219324 (decimal version) provides references and more details.
|
|
KEYWORD
|
base,nonn,nice,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|