The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A097259 Numbers whose set of base 13 digits is {0,C}, where C base 13 = 12 base 10. 2
 0, 12, 156, 168, 2028, 2040, 2184, 2196, 26364, 26376, 26520, 26532, 28392, 28404, 28548, 28560, 342732, 342744, 342888, 342900, 344760, 344772, 344916, 344928, 369096, 369108, 369252, 369264, 371124, 371136, 371280, 371292, 4455516 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 COMMENTS n such that there exists a permutation p_1, ..., p_n of 1, ..., n such that i + p_i is a power of 13 for every i. LINKS Vincenzo Librandi, Table of n, a(n) for n = 0..1000 FORMULA a(n) = 12*A033049(n). a(2n) = 13*a(n), a(2n+1) = a(2n)+12. MATHEMATICA f[n_] := FromDigits[ IntegerDigits[n, 2] /. {1 -> 12}, 13]; Array[f, 33, 0] (* or much slower *) fQ[n_] := Union@ Join[{0, 12}, IntegerDigits[n, 13]] == {0, 12}; Select[ Range[0, 4455516 ], fQ] (* Robert G. Wilson v, May 12 2012 *) FromDigits[#, 13]&/@Tuples[{0, 12}, 5] (* Vincenzo Librandi, Jun 04 2012 *) PROG (Magma) [n: n in [0..4500000] | Set(IntegerToSequence(n, 13)) subset {0, 12}]; // Vincenzo Librandi, Jun 04 2012 CROSSREFS Cf. A001196, A005823, A097251-A097262. Sequence in context: A085260 A082173 A005723 * A158546 A110216 A218839 Adjacent sequences: A097256 A097257 A097258 * A097260 A097261 A097262 KEYWORD nonn,base AUTHOR Ray Chandler, Aug 03 2004 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 28 15:40 EST 2023. Contains 359895 sequences. (Running on oeis4.)