login
A316600
Integers in increasing order of width when printed in Helvetica.
2
1, 9, 8, 6, 2, 0, 5, 7, 3, 4, 11, 91, 61, 81, 71, 31, 51, 21, 41, 12, 15, 19, 18, 16, 10, 13, 14, 17, 92, 62, 82, 72, 95, 99, 32, 52, 98, 65, 69, 85, 89, 96, 75, 79, 90, 68, 88, 35, 39, 66, 78, 86, 93, 22, 60, 76, 80, 94, 97, 42, 55, 59, 70, 38, 36, 63, 83, 30, 58, 64, 67, 73, 84, 87, 56
OFFSET
0,2
COMMENTS
The title is copied verbally from the second example "SUB[44]" of the linked xkcd webcomic number 2016 (subtitled "OEIS keeps rejecting my submissions"). To make the definition exact, the full title should be: The nonnegative integers sorted by increasing width of bounding box when printing their decimal representation using the Helvetica font, and in case of ties, sorted by increasing value.
The differences from the corresponding sequence A316599, which uses the Arial font, arise from the different width data for the digit characters and the absence of kerning for the number pair "11" in Helvetica. So the print width becomes a function of the number of printed digits, of the left margin of the bounding box of the most significant digit and of the right margin of the bounding box of the least significant digit.
See the comment in A316599 for more information.
LINKS
Adobe Font technical notes, Font Metrics for PDF Core 14 Fonts (Win), File Helvetica.afm dated 11/10/1999 in ZIP archive.
Randall Munroe, OEIS Submissions, xkcd Web Comic #2016, Jul 06 2018.
EXAMPLE
The relevant part of the applicable Adobe Font Metrics File Helvetica.afm is as follows:
Header information:
StartFontMetrics 4.1
Comment Creation Date: Thu May 1 12:38:23 1997
Comment UniqueID 43054
Version 002.000
Notice Copyright (c) 1985, 1987, 1989, 1990, 1997 Adobe Systems Incorporated. All Rights Reserved. Helvetica is a trademark of Linotype-Hell AG and/or its subsidiaries.
.
Individual character metrics:
C number Decimal value of default character code,
WX number Character width in x for writing direction 0,
B llx lly urx ury Character bounding box where llx, lly, urx, and ury are all numbers.
.
C 48 ; WX 556 ; N zero ; B 37 -19 519 703 ;
C 49 ; WX 556 ; N one ; B 101 0 359 703 ;
C 50 ; WX 556 ; N two ; B 26 0 507 703 ;
C 51 ; WX 556 ; N three ; B 34 -19 522 703 ;
C 52 ; WX 556 ; N four ; B 25 0 523 703 ;
C 53 ; WX 556 ; N five ; B 32 -19 514 688 ;
C 54 ; WX 556 ; N six ; B 38 -19 518 703 ;
C 55 ; WX 556 ; N seven ; B 37 0 523 688 ;
C 56 ; WX 556 ; N eight ; B 38 -19 517 703 ;
C 57 ; WX 556 ; N nine ; B 42 -19 514 703 ;
.
The resulting first few sorted print widths w are:
a(0) = 1, w(1) = 258 = 359 - 101;
a(1) = 9, w(9) = 472 = 514 - 42;
a(2) = 8, w(8) = 479 = 517 - 38;
a(3) = 6, w(6) = 480 = 518 - 38;
a(4) = 2, w(2) = 481 = 507 - 26;
a(5) = 0, w(0) = 482 = 519 - 37;
a(6) = 5, w(5) = 482 = 514 - 32, 0 < 5;
a(7) = 7, w(7) = 486 = 523 - 37;
a(8) = 3, w(3) = 488 = 522 - 34;
a(9) = 4, w(4) = 498 = 523 - 25;
a(10) = 11, w(11) = 814 = 556 - 101 + 359;
a(11) = 91, w(91) = 873 = 556 - 42 + 359;
a(12) = 61, w(61) = 877 = 556 - 38 + 359;
a(13) = 81, w(81) = 877 = 556 - 38 + 359, 61 < 81;
a(14) = 71, w(71) = 878 = 556 - 37 + 359
PROG
(PARI)llx=[101, 26, 34, 25, 32, 38, 37, 38, 42, 37];
urx=[359, 507, 522, 523, 514, 518, 523, 517, 514, 519];
lsd(x)=if(x%10==0, 10, x%10);
msd(x)=floor(x/10^logint(x, 10));
width(x)=556*logint(x, 10)-llx[msd(x)]+urx[lsd(x)];
w=vector(100);
large=1000000;
w[1]=large*(urx[10]-llx[10]);
for(k=2, 100, w[k]=large*width(k-1)+k-1);
v=vecsort(w);
for(k=1, 75, print1(v[k]%large, ", ")) \\ Hugo Pfoertner, Jul 12 2018
CROSSREFS
Sequence in context: A084660 A002391 A193626 * A087044 A246168 A248585
KEYWORD
nonn,base,dumb,look
AUTHOR
Hugo Pfoertner, Jul 09 2018
STATUS
approved