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 A179267 #2 Mar 30 2012 17:22:56 %S A179267 3,6,487,974,1461,2435,2922,4383,4870,7305,8766,12175,13149,14610, %T A179267 17532,21915,24350,26298,29220,36525,43830,48700,52596,65745,73050, %U A179267 87660,109575,131490,146100,219150,262980,328725,438300,657450,1095750 %N A179267 Numbers n which divide the periodic part (with zeros at end) of the decimal expansion of 1/n. %C A179267 There are two definitions of the periodic part: zeros may either begin or end the periodic part. For example, for 1/11 = 0.0909090..., the periodic part could be either 09 or 90. This sequences assumes that the zeros are at the end of the periodic part. See A171928 for the case of zeros at the beginning of the periodic part. %C A179267 Note that the terms following 487 are divisible by 487. This pattern continues until the prime number 56598313, which is another member of A045616. %t A179267 Reap[Do[k=RealDigits[1/n][[1,-1]]; If[Head[k] === List && Mod[FromDigits[k],n] == 0, Sow[n]], {n,10000}]][[2,1]] %K A179267 base,nonn %O A179267 1,1 %A A179267 _T. D. Noe_, Jul 06 2010