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 A330597 #11 May 09 2020 11:11:47
%S A330597 1,2,3,5,6,7,11,13,15,17,21,22,23,26,31,33,35,37,51,53,55,57,61,62,65,
%T A330597 66,67,71,73,77,111,113,115,131,133,137,151,155,157,173,177,211,213,
%U A330597 215,217,221,222,223,226,231,233,235,237,262,265,266,267,311,313
%N A330597 Squarefree numbers in which all substrings are squarefree.
%C A330597 This sequence is finite, the last term being a(1690) = 77377717.
%H A330597 Rémy Sigrist, <a href="/A330597/b330597.txt">Table of n, a(n) for n = 1..1690</a>
%H A330597 Rémy Sigrist, <a href="/A330597/a330597.gp.txt">PARI program for A330597</a>
%e A330597 1, 3, 7, 13, 37 and 137 are all squarefree, hence 137 is a term.
%t A330597 sfQ[k_]:=With[{i=IntegerDigits[k]},AllTrue[Flatten[Table[ FromDigits/@ Partition[ i,n,1],{n,IntegerLength[k]}]],SquareFreeQ]]; Select[ Range[ 350],sfQ] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, May 09 2020 *)
%o A330597 (PARI) See Links section.
%Y A330597 Cf. A005117, A085823 (prime variant), A202262 (composite variant).
%K A330597 nonn,base,fini,full
%O A330597 1,2
%A A330597 _Rémy Sigrist_, Dec 19 2019