cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A023094 a(n) is least k such that k and 2k are anagrams in base n (written in base 10).

This page as a plain text file.
%I A023094 #26 Aug 26 2025 04:52:51
%S A023094 32,18,8,350,480,21,104,125874,40,4147,5712,65,15680,585,96,833,7776,
%T A023094 133,61600,46851,176,63595,2232,225,106288,122931,280,3857,91948380,
%U A023094 341,237184,83853,408,543900,7236,481,8474,431516631,560,622339,683760,645
%N A023094 a(n) is least k such that k and 2k are anagrams in base n (written in base 10).
%C A023094 a(n) is divisible by n-1 for all n due to the anagram property: n and 2n are congruent modulo n-1. - _Peter Kagey_, Dec 23 2016
%H A023094 Amiram Eldar, <a href="/A023094/b023094.txt">Table of n, a(n) for n = 3..174</a>
%H A023094 Mathematics Stack Exchange, <a href="http://math.stackexchange.com/questions/2061958">Lower Bound for Anagram Sequence</a>.
%F A023094 a(3n-1) = A000567(n). - _Peter Kagey_, Dec 16 2016
%t A023094 Table[k = 1; While[! MatchQ @@ Map[Sort@ IntegerDigits[#, n] &, k {1, 2}], k++]; k, {n, 3, 30}] (* _Michael De Vlieger_, Dec 17 2016 *)
%o A023094 (PARI) a(n) = {my(k=1); while (vecsort(digits(k,n)) != vecsort(digits(2*k,n)), k++); k;} \\ _Michel Marcus_, Dec 17 2016
%Y A023094 Cf. A000567, A023095, A023096, A023097, A023098, A023099, A023100, A023101, A023102.
%K A023094 nonn,base,changed
%O A023094 3,1
%A A023094 _David W. Wilson_