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.

A187285 Smallest multiple of n beginning with 1.

This page as a plain text file.
%I A187285 #11 Jul 13 2013 12:03:48
%S A187285 1,10,12,12,10,12,14,16,18,10,11,12,13,14,15,16,17,18,19,100,105,110,
%T A187285 115,120,100,104,108,112,116,120,124,128,132,102,105,108,111,114,117,
%U A187285 120,123,126,129,132,135,138,141,144,147,100,102,104,106,108,110
%N A187285 Smallest multiple of n beginning with 1.
%C A187285 a(n) is in {n, 2n, 3n, 4n, 5n}. [_Charles R Greathouse IV_, Mar 07 2011]
%H A187285 Reinhard Zumkeller, <a href="/A187285/b187285.txt">Table of n, a(n) for n = 1..10000</a>
%t A187285 f[n_] := Block[{m = n}, While[ First@ IntegerDigits@ m != 1, m += n]; m]; Array[f, 55]
%o A187285 (PARI) a(n)=forstep(k=n, 5*n, n, if(Vec(Str(k))[1]=="1", return(k))) \\ _Charles R Greathouse IV_, Mar 07 2011
%o A187285 (Haskell)
%o A187285 a187285 n = until ((== 1) . a000030) (+ n) n
%o A187285 -- _Reinhard Zumkeller_, Mar 27 2012
%Y A187285 Cf. A082811, A082792, A082794, A082795, A082796, A082797, A082798, A187090.
%Y A187285 Cf. A000030.
%K A187285 base,nonn
%O A187285 1,2
%A A187285 _Robert G. Wilson v_, Mar 07 2011