Codegolf — Отображение N С Помощью N

Чего я хочу:

Проще говоря, мне нужен текстовый дисплей, который запрашивает ввод,

 Input: 0
Output:
000
0 0
0 0
0 0
000

Input: 1
Output:

1

1 

1

1

1

Input: 2
Output:
222

2
222
2
222

Input: 3
Output:
333

3
333

3
333

Input: 4
Output:
4 4
4 4
444

4

4

Input: 5
Output:
555
5  
555

5
555

Input: 6
Output:
666
6    
666
6 6
666

Input: 7
Output:
777

7

7

7

7

Input: 8
Output:
888
8 8
888
8 8
888

Input: 9
Output:
999
9 9
999

9
999
 

Пример :

Вам предоставлен ввод n . You can assume n будет одна цифра

Испытание:

Сделайте вышеописанное, используя как можно меньше байтов.

Я буду принимать только ответы, соответствующие всем требованиям.

Пробелы вокруг не являются обязательными. пока цифра отображается правильно.

Кроме того, <75 байт — это мой голос, самый низкий уровень принятия, но я всегда могу изменить принятый ответ, так что не бойтесь отвечать.

#код-гольф #ascii-art #kolmogorov-complexity

JavaScript (ES6), 88 байт

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 n=>`019
2 3
459
6 7
889`.replace(/\d/g,c=>[2,18,142,96,130,131,698,4,146][c]>>n&1?' ':n)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Числа кодируют, какие квадраты содержат пробелы для данной цифры, например. нижний левый угол имеет значение 146, потому что 1, 4 и 7 его не используют, а 146 = 2¹ + 2⁴ + 2⁷.

05AB1E, 40 39 38 байт

Попробуйте онлайн!

Объяснение

Япт, 43 байта

Содержит некоторые непечатные материалы. Попробуйте онлайн!

Подсчеты: 13 байт сжатых данных, 9 байт для их распаковки и 21 байт для формирования выходных данных.

Объяснение

Негольфированный код:

Существует ровно 4 различных варианта строк: ( TT represents a digit)

Таким образом, каждое число может быть сохранено как набор из пяти цифр по основанию 4. Поскольку каждое число может быть сохранено в 10 битах, общее количество составит 100 бит, что соответствует 13 байтам. Я пропущу процесс сжатия и вместо этого объясню распаковку.

После распаковки 13-байтовая сжатая строка выглядит следующим образом:

Обратите внимание, что это не удастся, если какой-либо из 4-значных прогонов начнется с T , as the leading zeroes would be left off when ↓← запущен. Мы можем исправить это, имея ¬ represent ↑→ , который появляется только три раза, и ни один из них не попадает в начало 4-значного ряда.

Итак, чтобы наша 50-значная строка могла хорошо сжиматься в куски по 4, нам пришлось добавить две дополнительные цифры. Добавление их в начало строки означает, что мы можем отрезать их с помощью однобайтовой ←↑→↓ .

К сожалению, в Japt нет встроенной функции для разделения строки на фрагменты длиной X. Однако у него есть встроенная функция для получения каждого X-го символа, поэтому мы можем хранить все данные, сначала кодируя все верхние строки, а затем все вторые ряды и т. д.

Итак, теперь у нас есть 5-значная строка, кодирующая цифру, которую мы хотим создать, например. ＧＨ✳✳§⟦⟦↑L↓¬⟧⟦↓↓⟧⟦T↓→⟧⟦T→¬⟧⟦↑↑¬↑⟧⟦←↓T⟧⟦T↑L⟧⟦→↓↓⟧⟦+L↓⟧⟦+↓T⟧⟧Ｎ³θ for ?421⎇＆ＩιＩλθ .

Чтобы объяснить магическое число, вернемся к четырем различным рядам. Если вы замените Ｅ§⪪”{⊞¶↙⬤\→*'K«-aRＱ¹νÀ⁰”⁵Ｎ?421⎇＆ＩιＩλθ with param($n);$a="$n$n$n";$b="$n $n";$c=" $n";$d="$n ";$r="abbbadddddacadaacacabbaccadacaadabaaccccababaabaca";0..4|%{gv $r[$_+($n*5)]-v} и с $a , you get

Транспонирование этого и последующее объединение в одну строку дает нам lambda n:'\n'.join('xxx x x'[int(i):][:3]for i in oct(0x3028000adba93b6b0000c0ad36ebac30180c0)[:-1][n::10]).replace('x',`n`) . Convert to decimal and, voilà, you have 2839. Reversing the process maps the digits String в четыре двоичные строки, показанные выше.

Почти готово! Теперь осталось только добавить пробелы и цифры:

И вуаля, неявный вывод позаботится обо всем остальном. Извините, это объяснение такое длинное, но я не вижу никакого реального способа сыграть в гольф, не сделав его менее понятным (если оно понятно...)

JavaScript (ES6), 115 111 байт

Принимает входные данные в виде строки.

Как это работает

Кодирование шаблонов

Четыре различных шаблона $n="$args" -split"ϽэϿ ͱ`0Ο ͽͼϿ Ņ`0ϻ ?эϿ"|%{-join($_[0..2]|%{"$n "[!($_-band1-shl$n)]})} , $n="$args" -split'ϽэϿ·ͱ Ο·ͽͼϿ·Ņ ϻ·ээϿ'|%{-join($_[0..2]|%{"$n·"[!($_-band1-shl$n)]})} , . A$&¶B$&¶C$&¶D$&¶E$& ([ACE][235689]|A0|E0|C4|A7)(?<=(.)) $2$2$2 (B[0489]|D[068]|A4|C0)(?<=(.)) $2 $2 D2 2 B5 5 B6 6 [A-E]
and for(;$i<5;) echo strtr( sprintf("b\n", # make a binary "1754"[[425,0,465,273,26,285,413,1,409,281][$argn]/4**$i++%4]) ,[" ",$argn]); # replace 0 with space and 1 with the input можно сжать как for(;$i<5;)echo strtr(sprintf("b\n","1754"[[425,0,465,273,26,285,413,1,409,281][$argn]/4**$i++%4]),[" ",$argn]); and extracted this way:

Подставив входную цифру ->n{20.times{|i|print i%4>2?$/:[" ",n]["_Q_@@_]UWUU_GD_WU]_U]AA__U_WU_"[n*3+i%4].ord>>i/4&1]}} for 19 0 19 1 17 2 19 3 19 4 17 5 17 6 19 7 19 8 19 9 Total - 184 и используя фактические пробелы, это дает выражение:

Кодировка цифр

Используя идентификаторы шаблонов, определенные выше, каждая цифра может быть представлена ​​величиной 5 * 2 = 10 бит.

Например:

Полный список:

Однако деление этих значений на 2 позволяет сэкономить два байта. Поэтому вместо этого мы храним:

Демо

СОГЛ V0.12, 30 байты

Попробуйте здесь! Сжатая строка x is

который представляет собой (начиная с 1 и заканчивая 0) числа, построчно, от числа к числу.

Остальные

• Bash + утилиты GNU, 114

Сэкономлено 2 байта благодаря @SophiaLechner

Вероятно, здесь есть еще несколько возможностей для сжатия, но вот начало:

Объяснение

Каждая строка каждой цифры представляет собой один из этих четырех шаблонов: EAC00CDF33AC373DEF00EEFB3 , and the full list of digits is encoded in base-4 as 32223000003031330303223003130331323300003232332303 Обозначив эти числа 0–3, каждая цифра может быть представлена ​​пятью цифрами по основанию 4. Например. 0 было бы 32223 .

• x x x x xxx converts hex dc<<<4o16iEAC00CDF33AC373DEF00EEFB3p|fold -5|sed "$[$1+1]!d s/0/ x\n/g s/1/x\n/g s/2/x x\n/g s/3/xxx\n/g y/x/$1/" . Это закодировано в шестнадцатеричном формате как
• ...‘ push the compressed string, replacing the ŗs with pop - the input '¹n split into chunks of 15 .w push the (1-indexed, wrapping) input-th item of that array 3n split into chunks of 3 implicitly output the array, line by line puts 5 base-4 digits on each line
• ŗ ŗ ŗ ŗ ŗŗŗŗ ŗŗŗŗŗ ŗŗŗŗŗŗ ŗŗŗŗ ŗŗŗŗŗ ŗŗ ŗŗŗŗ ŗ ŗŗŗŗŗ ŗŗŗ ŗŗŗŗŗŗŗŗ ŗŗŗŗ ŗŗŗŗŗŗŗ ŗ ŗ ŗ ŗŗŗŗŗ ŗŗŗŗŗ ŗŗŗŗŗŗŗŗ ŗŗŗŗ ŗŗŗŗŗŗŗŗ ŗŗ ŗŗ ŗŗŗŗ :
  • по основанию-4.
  • удаляет все входные строки, кроме строки с номером n+1 (строки с 1-индексами sed) ■'τč▲Β►║⁰ΡāQšJ┘tXdnοO¹‘ es) for each line of the given digit, along with a newline for the end of each row
  • переводит цифры по основанию 4 в шаблон (из ■'τč▲Β►║⁰ΡāQšJ┘tXdnοO¹‘'¹n.w3n es to digit n.

транслитерирует.

, 45 43 байта

Попробуйте онлайн!

Объяснение

Сетчатка, 166 164 163 байт

Два пробела в третьей строке снизу

Попробуйте онлайн! Улучшенная версия @Okx's

Пиф 82 85 91 100 байт

Пакетный файл, 8 + 184 байта

Вот мое обязательное пакетное решение. К сожалению, стандартный метод достижения этой цели — пакетная обработка более 300 байт, поэтому мы прибегаем к гораздо более дешевой тактике.

В текущем каталоге у меня установлено 10 файлов с именами от 0 до 9. В каждом из них находится соответствующая сетка пикселей 5x3. Например:

Количество байтов для них:

Рубин, 94 байта

Ungolfed в тестовой программе

PHP, 115 байт

Попробуйте онлайн!

Расширенный Кодирование

, 125 байт Попробуйте онлайн!

PowerShell, 126 120 113 109 101

Юникод — это весело. Символы также намного короче цифр. Приведенный выше код дважды содержит U+0000, поэтому его нельзя скопировать напрямую (хотя в файле он работает нормально). Можно скопировать следующий код:

, 190 байт

В последней строке есть два пробела, но SE не хочет их отображать :/ Исправлено!

Java 8, 278 214 210 204 байта Порт@Нилответ Retina 0123 .

. Принимает входные данные как

, 174 125 байт

,159 135 128 118 байт

Текущий ответ: удалены посторонние имена переменных.

Попробуйте онлайн!

Мне нужно будет посмотреть, смогу ли я получить некоторые трюки из других ответов: P РЕДАКТИРОВАТЬ

Становимся умнее с вызовом мегастроки Переключился на использование строки чисел для индексации 0 to save 7 bytes. Although I liked my previous dynamic variable name calls in the below code (135 bytes)

Древесный уголь, 61 38 байт

Попробуйте онлайн! Ссылка на подробную версию кода. Примечание. Конечный пробел. Объяснение:

Разделите (сжатую) строку на группы по 5, возьмите строку с индексом, заданным на входе, и сопоставьте символы в группе (которые всегда равны 1, 4, 5 или 7).

Преобразуйте символ из базы 10 в трехзначный код с базой 2, используя входной символ и пробел в качестве цифр. Затем 5 результатов неявно печатаются в отдельных строках.

Общий порт немного скучен, поэтому вот более идиоматический 61-байтовый ответ:

Попробуйте онлайн! Никакой подробной версии, поскольку девербосификатор не понимает списки направлений или даже разнонаправленности внутри обычных многоугольников. Объяснение:

Каждый путь указывается с помощью списка направлений ( ¤ ). Four usable shortcuts save bytes: s2 // Slice off the first two chars of the result. представляет # , 0 представляет s4 , 0 представляет 3131332333332111200122213333313321011121213133133133 while mZ{Zc s4} mZ{ } // Replace each character Z in the compressed string with the following: Zc // Take the char-code of Z. s4 // Convert to a base-4 string. представляет # # # # ### , although at least one arrow must remain for the list to be recognised as a direction list (so for instance # не может быть использован для "Ýûÿ©ÿßY÷ß"® c s4à ¤ ëAU ¬ £ 2839¤ ë4Xà · d0S1U "Ýûÿ©ÿßY÷ß"mZ{Zc s4} s2 ëAU q mX{2839s2 ë4X} qR d0S1U ).

Желе, 35 32 байта

Попробуйте онлайн! или увидеть их всех.

То же, что и метод Дзаймы.

Перл 5 •Y¤ŸèK'¦ú’ò™^N• # the compressed string "318975565561233953387608032537" 4B # convert to base-4 5ô # split into strings of size 5 ¹è # get the string at index <input> v # for each digit y in string 5714yè # get the digit in 5714 at index y 8+ # add 8 b # convert to binary ¦ # remove the leading 1 𹫠Sè # with each digit in the binary number, # index into the string " <input>" , # print with newline , 101 bytes

Попробуйте онлайн!

Питон 3, 119 байт

Попробуйте онлайн!

Каждый «пиксель» представлен как целое число, где каждая степень двойки указывает, является ли пиксель сплошным.