Główny układ jest pamięciowy urządzenia do przekształcania numerów słowami, więc mogą być zapamiętane łatwiej.

Opiera się na tym, jak słowa brzmią fonetycznie, ale aby uprościć sprawę, zajmiemy się tylko pisownią słów. Oznacza to, że będą jakieś nieprawidłowe konwersje, ale to w porządku.

Aby przekonwertować liczbę na słowo za pomocą naszego uproszczonego systemu głównego:

• Wymień każdy 0z slub z. (Niektóre mogą być, sa niektóre mogą z. To samo idzie poniżej.)
• Zamień 1je na tlub dlub th.
• Wymień każdy 2z n.
• Wymień każdy 3z m.
• Wymień każdy 4z r.
• Wymień każdy 5z l.
• Zamień 6je na jlub shlub ch.
• Zamień 7je na klub club glub q.
• Wymień każdy 8z flub v.
• Wymień każdy 9z plub b.
• Dodaj litery w aehiouwxydowolnym miejscu w dowolnych ilościach, aby, jeśli to możliwe, stworzyć prawdziwe angielskie słowo .
  Jedynym wyjątkiem jest to, że hnie można wstawić po slub c.

Liczba może być w rzeczywistości dowolnym ciągiem cyfr od 0 do 9 (brak miejsc po przecinku, przecinki lub znaki).
Słowo może zawierać tylko małe litery az.

Przykłady

Liczbę 32należy przekonwertować jako ?m?n?, gdzie ?reprezentuje dowolny skończony ciąg wykonany z liter aehiouwxy(ciąg z wolnej monoidy, jeśli wolisz). Istnieje wiele sposobów, to może być wykonane do prawdziwego angielskiego słowa: mane, moon, yeoman, itd.

Liczba 05może być przekonwertowana jako ?s?l?lub ?z?l?. Niektóre możliwości są easily, hasslei hazel. Słowo shawljest niedozwolone, ponieważ hnie może zostać umieszczone po s; byłby błędnie odczytany jako 65.

Wyzwanie

Napisz program lub funkcję, która pobiera ciąg cyfr 0–9 i znajdzie wszystkie słowa, na które można by je przekonwertować, używając uproszczonego głównego systemu mnemonicznego.

Twój program ma dostęp do pliku tekstowego z listą słów, który określa, jakie są wszystkie „prawdziwe” angielskie słowa. W każdym wierszu tego pliku znajduje się jedno małe słowo az, a opcjonalnie można założyć, że ma on końcowy znak nowej linii. Oto lista prawdziwych słów, których możesz użyć do testowania. Możesz założyć, że ten plik listy słów nazywa się f(lub coś dłuższego) i znajduje się w dowolnym wygodnym katalogu.

W przypadku kary 35 bajtów (dodaj 35 do wyniku) możesz założyć, że lista słów jest już załadowana do zmiennej jako lista ciągów znaków. Dotyczy to głównie języków, które nie potrafią odczytać plików, ale każde przesłanie może z nich skorzystać.

Twój program musi wypisać wszystkie słowa z listy słów, na które można przekonwertować numer wejściowy. Powinny być drukowane na standardowym (lub podobnym), po jednym w wierszu (z opcjonalnym końcowym znakiem nowej linii), lub mogą zostać zwrócone jako lista ciągów, jeśli zdecydujesz się napisać funkcję. Lista słów nie musi być alfabetycznie, a wynik nie musi być.

Jeśli nie ma możliwych słów, wynik (lub lista) będzie pusty. Dane wyjściowe są również puste, jeśli wprowadzono pusty ciąg.

Weź dane wejściowe za pomocą stdin, wiersza poleceń lub jako argument ciągu funkcji. Lista słów lub nazwa pliku nie powinny być częścią wejścia, a jedynie ciąg cyfr.

Pasujesz tylko pojedyncze słowa na liście słów, a nie sekwencje słów. Słowo noonprawdopodobnie będzie jednym z wyników 22, ale sekwencja słów no onenie.

Przypadki testowe

Załóżmy, że jest to lista słów:

stnmrljkfp
zthnmrlshqfb
asatanamaralajakafapa
aizxydwwwnhimouooraleshhhcavabe
zdnmrlshcvb
zdnmrlshchvb
sthnmrlchgvb
shthnmrlchgvb
bob
pop
bop
bopy
boppy

Wejście 0123456789powinno dać wszystkie z wyjątkiem długich słów zdnmrlshchvbi shthnmrlchgvb:

stnmrljkfp
zthnmrlshqfb
asatanamaralajakafapa
aizxydwwwnhimouooraleshhhcavabe
zdnmrlshcvb
sthnmrlchgvb

Dane wejściowe 99powinny dać:

bob
pop
bop
bopy

(Słowa wyjściowe mogą być w dowolnej kolejności.)

Punktacja

Najkrótsze przesłanie w bajtach wygrywa. Tiebreaker przechodzi do przesłanego posta jako pierwszego.

Powiązana strona: numzi.com .

Perl, 87 84

open A,f;"@ARGV"eq s/[cs]h/j/gr=~y/stnmrljkfpzdcgqvb\0-z/0-90177789/dr&&print for<A>

Pobiera dane wejściowe jako parametr wiersza poleceń:

$perl m.pl 23940

Może być nieco krótszy, jeśli lista słów byłaby dozwolona na standardowym wejściu:

$perl -lnE'INIT{$;=pop}$;eq s/[cs]h/j/gr=~y/stnmrljkfpzdcgqvba-z/0-90177789/dr&&say' 99 <f

Python 2, 215 208 bajtów

To rozwiązanie Pythona tworzy wyrażenie regularne z części indeksowanych argumentem wiersza poleceń, a następnie testuje każde słowo za pomocą tego (raczej dużego) wyrażenia regularnego.

import re,sys
a='[sz] (d|th?) n m r l (j|sh|ch) [kcgq] [fv] [pb]'.split()
b=z='((?<![sc])h|[aeiouwxy])*'
for i in sys.argv[1]:b+=a[int(i)]+z
for d in open('f'):
 d=d.strip()
 if re.match('^'+b+'$',d):print d

Oryginalne źródło przed minifikatorem:

import re,sys
regexbits = '[sz] (d|th?) n m r l (j|sh|ch) [kcgq] [fv] [pb]'.split()

regex = other = '((?<![sc])h|[aeiouwxy])*'
for i in sys.argv[1] :
    regex += regexbits[int(i)] + other
print regex     # DEBUG

for word in open('f'):
    word = word.strip()
    if re.match('^'+regex+'$', word) :
        print word

Na przykład wyrażenie regularne testu 99to:

^((?<![sc])h|[aeiouwxy])*[pb]((?<![sc])h|[aeiouwxy])*[pb]((?<![sc])h|[aeiouwxy])*$

Ten (?<![sc])hbit jest komponentem „patrz za asercją negatywną”, który zapewnia, że ​​a hnie następuje pos lub cw ogólnych części wypełniacza.

Dzięki Calvin. To wyzwanie zmotywowało mnie do odświeżenia moich zardzewiałych umiejętności wyrażania regularnego.

Python 3, 170

import sys,re
t=str.maketrans('sztdnmrljkcgqfvpb','00112345677778899','aehiouwxy\n')
for s in open('f'):re.sub('sh|ch','j',s).translate(t)!=sys.argv[1] or print(s,end='')

Wersja do odczytu:

import sys, re

table = str.maketrans('sztdnmrljkcgqfvpb', '00112345677778899', 'aehiouwxy\n')

for line in open('f'):
    line = re.sub('sh|ch', 'j', line)
    if line.translate(table) == sys.argv[1]:
        print(line, end='')

Kod korzysta z faktu, że thjest zbędny (ponieważ odwzorowuje na ten sam numer co ti hjest znakiem dopełniającym).

Funkcja statyczna maketranstworzy tabelę odwzorowującą znaki pierwszego argumentu na znaki drugiego argumentu oraz znaki trzeciego argumentu na None(co spowoduje usunięcie tych znaków).

Ostateczny kod może zostać skrócony o kilka bajtów, tworząc tabelę jako bezpośredni argument translate.

sed, pasta, grep, cut - 109

sed -e 's/[sc]h/6/g;s/[aehiouwxy]//g;y/sztdnmrljkcqgfvpb/00112345677778899/' w|paste w -|grep " $1$"|cut -f1

Pobiera plik „w”, konwertuje każde słowo na jego numer, wkleja z powrotem do oryginału, grep dla liczby i zwraca pasujące słowo. Zauważ, że biały znak po cytacie po grep jest tabulatorem, domyślnym ogranicznikiem wklejania.

Wiem, że Perl jest daleko przed nami, chciałem na przykład lepszej wersji powłoki.

O tak, część 1 $ oznacza, że ​​należy go uruchamiać ze skryptu powłoki (większość powłok powinna działać), więc wymaga argumentu wiersza poleceń.

Bash + coreutils, 216

sed -n "$(sed 's/[aeiouwxy]//g
:l
s/\([^sc]\)h/\1/g
tl'<w|grep -nf <(eval printf '%s\\n' `sed 's/0/{s,z}/g
s/1/{t,th,d}/g
y/2345/nmrl/
s/6/{j,sh,ch}/g
s/7/{k,c,g,q}/g
s/8/{f,v}/g
s/9/{p,b}/g'<<<$1`)|sed s/:.\*/p/)" w

• Lista słów w pliku o nazwie w
• Najbardziej wewnętrzna sedzastępuje cyfry ich możliwymi zamiennikami
• The eval printf zastosowania powłoki nawiasy rozszerzyć na wszystkie możliwe substytucje
• Drugi sedw pierwszym wierszu usuwa aeiouwxyi h(jeśli nie jest poprzedzony [sc]) z listy słów
• Grep drukuje wszystkie dopasowania z numerami linii
• Ponieważ usunęliśmy aeiouwxyi hz listy słów, ostatni sedzamienia wyniki grep (numery wierszy każdego dopasowania) na inne sedwyrażenie, które jest przetwarzane przez najbardziej zewnętrzne, sedaby odsłonić wszystkie możliwe słowa z listy słów.

Wynik:

Plik listy słów jest określony jako arg wiersza polecenia, po którym następuje liczba mnemoniczna:

ubuntu@ubuntu:~$ ./numzi.sh 99
bob
pop
bop
bopy
boppy
$ ./numzi.sh 0123456789
stnmrljkfp
zthnmrlshqfb
asatanamaralajakafapa
aizxydwwwnhimouooraleshhhcavabe
zdnmrlshcvb
sthnmrlchgvb
$ 

tr, sed, grep, xargs, sh, 77

tr 0123456789 ztnmrljkfp|sed 's/ */[aehiouwxy]*/g'|xargs sh -c 'grep -x $0 f'

Oczekuje liczby w stdin, a lista słów powinna być zapisana w pliku f.

Nie używa wszystkich zamienników (1 zawsze będzie z, 7 zawsze będzie k), więc można go nazwać leniwym rozwiązaniem, ale znajduje co najmniej jeden mnemonik dla 95 liczb w [1-100].