%I A065343
%S A065343 14,18,85,51,6,34,10,15,14,21,18,35,36,33,26,30,72,65,34,42,30,57,231,
%T A065343 70,30,30,42,66,54,106,58,60,116,93,42,105,140,249,60,84,30,134,82,114,
%U A065343 70,174,220,140,66,105,98,147,66,178,90,105,78,298,154,291,118,90,90
%N A065343 Smallest k such that usigma(n+k) = usigma(k).
%H A065343 Harry J. Smith, <a href="b065343.txt">Table of n, a(n) for n=1,...,1000</
               a>
%o A065343 (PARI) usigma(n)= { local(f,s=1); f=factor(n); for(i=1, matsize(f)[1], 
               s*=1 + f[i, 1]^f[i, 2]); return(s) } { for (n=1, 1000, k=1; while 
               (usigma(n + k) != usigma(k), k++); write("b065343.txt", n, " ", k) 
               ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 16 2009]
%Y A065343 Cf. A034448.
%Y A065343 Sequence in context: A000053 A079349 A154864 this_sequence A165228 A013649 
               A013657
%Y A065343 Adjacent sequences: A065340 A065341 A065342 this_sequence A065344 A065345 
               A065346
%K A065343 nonn
%O A065343 1,1
%A A065343 Jason Earls (zevi_35711(AT)yahoo.com), Dec 02 2001