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 A217773 #16 Nov 20 2019 19:57:57
%S A217773 104,3255,22935,983775,1025504,2200694,2619705,4163355,4447064,
%T A217773 4695704,6372794,9718904,11903775,23992215,26879684,29357475,37239735,
%U A217773 40588485,41207144,48615735,56424555,76466985,81591194,83864055,113664135,118018094,166758015
%N A217773 Numbers n such that tau(n) = tau(n+1) and phi(n) = phi(n+1).
%C A217773 Intersection of A001274 and A005237. [_Alex Ratushnyak_, Mar 27 2013]
%H A217773 Donovan Johnson, <a href="/A217773/b217773.txt">Table of n, a(n) for n = 1..402</a> (terms < 10^12)
%t A217773 Select[Range[100000000],DivisorSigma[0, #] == DivisorSigma[0, # + 1] && EulerPhi[#] == EulerPhi[# + 1] &]
%t A217773 Position[Partition[Table[{DivisorSigma[0,n],EulerPhi[n]},{n,1668*10^5}], 2,1], _?(#[[1]]==#[[2]]&),1,Heads->False]//Flatten (* _Harvey P. Dale_, Nov 20 2019 *)
%Y A217773 Cf. A001274, A005237.
%K A217773 nonn
%O A217773 1,1
%A A217773 _Jayanta Basu_, Mar 24 2013