cp's OEIS Frontend

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.

A116910 Numbers k such that the number of letters in the Roman numeral for k divides k.

This page as a plain text file.
%I A116910 #28 Jul 29 2025 08:37:27
%S A116910 1,2,3,4,5,6,8,10,12,20,21,24,30,40,44,45,48,50,54,60,64,80,84,85,88,
%T A116910 90,92,96,100,102,110,111,112,116,120,132,133,135,150,152,156,168,174,
%U A116910 175,180,182,189,200,201,204,210,220,222,225,230,240,245,246,248
%N A116910 Numbers k such that the number of letters in the Roman numeral for k divides k.
%H A116910 Nathaniel Johnston and Harvey P. Dale, <a href="/A116910/b116910.txt">Table of n, a(n) for n = 1..1000</a> (first 593 terms from Nathaniel Johnston)
%F A116910 {k such that A006968(k)|k}.
%e A116910 a(23) = 84 because there are 6 letters in LXXXIV and 6 divides 84.
%e A116910 a(44) = 189 because there are 7 letters in CLXXXIX and 7 divides 189.
%e A116910 a(56) = 248 because there are 8 letters in CCXLVIII and 8 divides 248.
%p A116910 for n from 1 to 500 do if(n mod length(convert(n,roman)) = 0)then printf("%d, ",n): fi: od: # _Nathaniel Johnston_, May 18 2011
%t A116910 Select[Range[250],Divisible[#,StringLength[IntegerString[#,"Roman"]]]&] (* _Harvey P. Dale_, Feb 13 2013 *)
%Y A116910 Cf. A006968.
%K A116910 base,easy,nonn,less
%O A116910 1,2
%A A116910 _Jonathan Vos Post_, Mar 17 2006
%E A116910 Corrected by _Nathaniel Johnston_, May 18 2011