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.

A075014 Smallest k such that the concatenation k, k-1 is divisible by n; or 0 if no such number exists.

This page as a plain text file.
%I A075014 #6 Mar 04 2023 18:10:44
%S A075014 1,1,2,3,1,5,2,3,5,1,17,17,6,9,11,3,16,5,7,21,2,17,18,29,26,17,5,33,8,
%T A075014 11,35,3,17,33,26,41,11,7,17,21,13,47,4,17,41,41,27,29,9,51,50,17,21,
%U A075014 5,61,61,35,27,52,41,29,35,68,45,6
%N A075014 Smallest k such that the concatenation k, k-1 is divisible by n; or 0 if no such number exists.
%H A075014 Harvey P. Dale, <a href="/A075014/b075014.txt">Table of n, a(n) for n = 1..1000</a>
%e A075014 a(14) = 9 as 14 divides 98.
%t A075014 skc[n_]:=Module[{k=1},While[Mod[FromDigits[Flatten[IntegerDigits/@{k,k-1}]],n] != 0,k++];k]; Array[skc,70] (* _Harvey P. Dale_, Mar 04 2023 *)
%Y A075014 Cf. A075114, A075115, A075116, A075117.
%K A075014 base,nonn
%O A075014 1,3
%A A075014 _Amarnath Murthy_, Sep 01 2002
%E A075014 Corrected and extended by Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 19 2003