В задаче 2014 года Майкл Стерн предлагает использовать OCR для разбора на 2014 год. Я хотел бы взять эту задачу в другом направлении. Используя встроенное распознавание текста из выбранной вами языковой / стандартной библиотеки, создайте наименьшее изображение (в байтах), которое анализируется в строке ASCII «2014».

Исходное изображение Стерна составляет 7357 байт, но с небольшим усилием его можно сжать без потерь до 980 байт. Без сомнения, черно-белая версия (181 байт) также работает с тем же кодом.

Правила: Каждый ответ должен содержать изображение, его размер в байтах и ​​код, необходимый для его обработки. По понятным причинам ... Разрешены любые разумные языки и форматы изображений.

Изменить: в ответ на комментарии я расширю это, чтобы включить любую существующую библиотеку, или даже http://www.free-ocr.com/ для тех языков, где OCR недоступен.

Shell (ImageMagick, Tesseract), 18 байт

file=golf_2014
echo -n UDQKMTMgNQruqCqo6riKiO6I | base64 -d > $file.pbm
convert -border 2x2 -bordercolor white -resize 300% -sharpen 0 -monochrome $file.pbm $file.png
tesseract $file.png $file digits
cat $file.txt
rm $file.pbm $file.png $file.txt

Размер изображения составляет 18 байт, и его можно воспроизвести следующим образом:

echo -n UDQKMTMgNQruqCqo6riKiO6I | base64 -d > 2014.pbm

Это выглядит так (это копия PNG, а не оригинал):

После обработки с ImageMagick это выглядит так:

Использование ImageMagick версии 6.6.9-7, Tesseract версии 3.02. Изображение PBM было создано в Gimp и отредактировано с помощью шестнадцатеричного редактора.

Эта версия требует jp2a.

file=golf_2014
echo -n UDQKMTMgNQruqCqo6riKiO6I | base64 -d > $file.pbm
convert -border 2x2 -bordercolor white -resize 300% -sharpen 0 -monochrome $file.pbm $file.png
tesseract $file.png $file digits
cat $file.txt
convert -background black -fill white -border 2x2 -bordercolor black -pointsize 100 label:$(cat $file.txt) $file.jpg
jp2a --chars=" $(cat $file.txt) " $file.jpg
rm $file.pbm $file.png $file.txt $file.jpg

Это выводит что-то вроде этого:

    2014444444102         01144444102              214441                 214441     
   1             1      24           1            04    4                0     4     
  1    410201     0    0    410004    1       2014      4              21      4     
 24   42     0    4    4    0     1    0    24          4             04       4     
  22222      1    1   0    42     0    4    2   4100    4            1   41    4     
            1    42   0    4      2     2   2412   0    4          24   420    4     
          04    42    0    1      2     2          0    4         0   40  0    4     
       204    42      0    1      2     2          0    4       24   42   0    4     
     21     12        0    4      0    42          0    4      2     411114     1112 
    04   412          24    0     1    0           0    4      0                   0 
  24     1111111110    1    42  21    4            0    4      200011111001    40002 
  4               4     04    44     42            0    4                 0    4     
 0                4      214       10              0    4                 0    4     
  22222222222222222         222222                  22222                  22222     

Java + Tesseract, 53 байта

Поскольку у меня нет Mathematica, я решил немного изменить правила и использовать Tesseract для распознавания текста. Я написал программу, которая отображает «2014» в изображение, используя различные шрифты, размеры и стили, и находит самое маленькое изображение, которое распознается как «2014». Результаты зависят от доступных шрифтов.

Вот победитель на моем компьютере - 53 байта, используя шрифт "URW Gothic L":

Код:

import java.awt.Color;
import java.awt.Font;
import java.awt.FontMetrics;
import java.awt.Graphics2D;
import java.awt.GraphicsEnvironment;
import java.awt.image.BufferedImage;
import java.io.BufferedReader;
import java.io.File;
import java.io.FileReader;
import java.io.IOException;

import javax.imageio.ImageIO;

public class Ocr {
    public static boolean blankLine(final BufferedImage img, final int x1, final int y1, final int x2, final int y2) {
        final int d = x2 - x1 + y2 - y1 + 1;
        final int dx = (x2 - x1 + 1) / d;
        final int dy = (y2 - y1 + 1) / d;
        for (int i = 0, x = x1, y = y1; i < d; ++i, x += dx, y += dy) {
            if (img.getRGB(x, y) != -1) {
                return false;
            }
        }
        return true;
    }

    public static BufferedImage trim(final BufferedImage img) {
        int x1 = 0;
        int y1 = 0;
        int x2 = img.getWidth() - 1;
        int y2 = img.getHeight() - 1;
        while (x1 < x2 && blankLine(img, x1, y1, x1, y2)) x1++;
        while (x1 < x2 && blankLine(img, x2, y1, x2, y2)) x2--;
        while (y1 < y2 && blankLine(img, x1, y1, x2, y1)) y1++;
        while (y1 < y2 && blankLine(img, x1, y2, x2, y2)) y2--;
        return img.getSubimage(x1, y1, x2 - x1 + 1, y2 - y1 + 1);
    }

    public static int render(final Font font, final int w, final String name) throws IOException {
        BufferedImage img = new BufferedImage(w, w, BufferedImage.TYPE_BYTE_BINARY);
        Graphics2D g = img.createGraphics();
        float size = font.getSize2D();
        Font f = font;
        while (true) {
            final FontMetrics fm = g.getFontMetrics(f);
            if (fm.stringWidth("2014") <= w) {
                break;
            }
            size -= 0.5f;
            f = f.deriveFont(size);
        }
        g = img.createGraphics();
        g.setFont(f);
        g.fillRect(0, 0, w, w);
        g.setColor(Color.BLACK);
        g.drawString("2014", 0, w - 1);
        g.dispose();
        img = trim(img);
        final File file = new File(name);
        ImageIO.write(img, "gif", file);
        return (int) file.length();
    }

    public static boolean ocr() throws Exception {
        Runtime.getRuntime().exec("/usr/bin/tesseract 2014.gif out -psm 8").waitFor();
        String t = "";
        final BufferedReader br = new BufferedReader(new FileReader("out.txt"));
        while (true) {
            final String s = br.readLine();
            if (s == null) break;
            t += s;
        }
        br.close();
        return t.trim().equals("2014");
    }

    public static void main(final String... args) throws Exception {
        int min = 10000;
        for (String s : GraphicsEnvironment.getLocalGraphicsEnvironment().getAvailableFontFamilyNames()) {
            for (int t = 0; t < 4; ++t) {
                final Font font = new Font(s, t, 50);
                for (int w = 10; w < 25; ++w) {
                    final int size = render(font, w, "2014.gif");
                    if (size < min && ocr()) {
                        render(font, w, "2014win.gif");
                        min = size;
                        System.out.println(s + ", " + size);
                    }
                }
            }
        }
    }
}

Mathematica 753 100

f[n_,format_]:=
Module[{filename},
Print["raster: ",n," by ", n];
filename="2014At"<>ToString[n]<>"."<>format;
Print["filename:  ",filename];
Print["format: ",format];
Print["raster image: ",rasterImg=Rasterize[Style[2014,"OCR A Std"],
RasterSize->n,ImageSize->1n,ImageResolution->6n]];
Export[filename,rasterImg];
Print["Actual imported image: ",img=Switch[format,"PDF"|"HDF",Import[filename][[1]],
_,Import[filename]]];
Print["Identified text: ",TextRecognize[ImageResize[img,Scaled[3]]]];
Print["filesize (bytes): ",FileByteCount[filename]]]

Мой лучший случай до сих пор:

f[24, "PBM"]

Mathematica, 78 байт

Хитрость для победы в Mathematica, вероятно, заключается в использовании функции ImageResize [], как показано ниже.

Сначала я создал текст «2014» и сохранил его в GIF-файле, чтобы сравнить его с решением Дэвида Каррахера. Текст выглядит так . Это никак не оптимизировано; это просто Женева с небольшим размером шрифта; другие шрифты и меньшие размеры могут быть возможны. Прямой TextRecognize [] потерпит неудачу, но TextRecognize [ImageResize []]] не имеет проблем

filename = "~/Desktop/2014.gif";
Print["Actual imported image: ", img = Import[filename]]
Print["Identified text: ", 
 TextRecognize[ImageResize[img, Scaled[2]]]]
Print["filesize (bytes): ", FileByteCount[filename]]

Суета с гарнитурой, размером шрифта, степенью масштабирования и т. Д., Вероятно, приведет к работе файлов еще меньшего размера.