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.
%I A069022 #15 Feb 22 2020 20:54:24 %S A069022 1,8,80,80,1215,16767,76544,636416,3995648,24151040,36315135, %T A069022 689278976,1487503359,1487503359,155240824832,785129144319, %U A069022 4857090670592,45922887663615,157197025673216,1375916505694208,2280241934368767 %N A069022 Start of the first occurrence of two consecutive numbers divisible by an n-th power. %C A069022 Essentially the same as A063528. [_R. J. Mathar_, Sep 29 2008] %e A069022 (8, 9) is the first occurrence of two consecutive numbers divisible by a square, so a(2) = 8. %t A069022 a = {1, 1}; k = 4; Do[ While[Min[a] < n, k++; a = Drop[a, 1]; a = Append[ a, Max[ Transpose[ FactorInteger[k]] [[2]] ]]]; Print[k - 1], {n, 2, 9}] (* _Robert G. Wilson v_ *) %Y A069022 Cf. A069021. %K A069022 nonn %O A069022 1,2 %A A069022 _Amarnath Murthy_, Apr 02 2002 %E A069022 More terms from Larry Reeves (larryr(AT)acm.org), Oct 12 2003