login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A030623
Powers of 2 grouped in pairs of 2 digits (version 2).
3
12, 48, 16, 32, 64, 12, 82, 56, 51, 21, 2, 42, 4, 84, 9, 68, 19, 21, 63, 84, 32, 76, 86, 55, 36, 13, 10, 72, 26, 21, 44, 52, 42, 88, 10, 48, 57, 62, 9, 71, 52, 41, 94, 30, 48, 38, 86, 8, 16, 77, 72, 16, 33, 55, 44, 32, 67, 10, 88, 64, 13, 42, 17, 72, 82, 68, 43, 54, 56, 53, 68
OFFSET
1,1
COMMENTS
When a 0 occurs as the most significant digit of the pair, it is simply ignored, e.g., "02" becomes just 2. The following pairs are unaffected. - Alonso del Arte, Mar 28 2020
EXAMPLE
The first few powers of 2 are 1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192. The digits are 1, 2, 4, 8, 1, 6, 3, 2, 6, 4, 1, 2, 8, 2, 5, 6, 5, 1, 2, 1,0, 2, 4, 2, 0, 4, 8, 4, 0, 9, 6. Grouping them in pairs, we obtain 12, 48, 16, 32, 64, 12, 82, 56, 51, 21, 02, 42, 04, 84, 09, 68, etc.
MAPLE
sq:=[]: for n from 0 to 100 do s:=convert(2^n, base, 10): l:=nops(s): sq:=[op(sq), seq(s[l-i], i=0..l-1)] od: seq(sq[2*i-1]*10+sq[2*i], i=1..100); # C. Ronaldo
MATHEMATICA
FromDigits/@Partition[Flatten[IntegerDigits[2^Range[0, 63]]], 2] (* Alonso del Arte, Mar 28 2020 *)
PROG
(Scala) (List.fill(63)(2: BigInt)).scanLeft(1: BigInt)(_ * _).map(_.toString.toCharArray).flatten.sliding(2, 2).map(_.toArray).toList.map(new String(_)).map(Integer.parseInt(_)) // Alonso del Arte, Mar 28 2020
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Alexei Kozlowski (bros(AT)spf.minsk.by)
EXTENSIONS
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 03 2005
STATUS
approved