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.

A128399 Numbers k such that k^2 divides 19^k-1.

This page as a plain text file.
%I A128399 #15 Jun 11 2021 04:59:00
%S A128399 1,2,3,4,6,9,10,12,18,20,30,36,42,60,84,90,110,126,156,180,210,220,
%T A128399 252,294,330,381,420,468,588,630,660,724,762,780,882,930,990,1092,
%U A128399 1143,1260,1332,1470,1510,1524,1764,1806,1830,1860,1980,2028,2058,2172,2286,2310
%N A128399 Numbers k such that k^2 divides 19^k-1.
%H A128399 Seiichi Manyama, <a href="/A128399/b128399.txt">Table of n, a(n) for n = 1..5000</a>
%t A128399 Join[{1},Select[Range[3000],PowerMod[19,#,#^2]==1&]] (* _Harvey P. Dale_, Oct 24 2017 *)
%o A128399 (PARI) for(k=1, 1e4, if(Mod(19, k^2)^k==1, print1(k", "))) \\ _Seiichi Manyama_, Mar 25 2020
%Y A128399 Columns k=19 of A333500.
%Y A128399 Cf. A127103, A127104, A127105, A127106, A127107, A127102, A127101, A127100, A127092, A128405, A128393, A128394, A128395, A128396, A128397, A128398, A128400, A128401, A128402, A128403, A128404.
%K A128399 nonn
%O A128399 1,2
%A A128399 _Alexander Adamchuk_, Mar 01 2007