Biorąc pod uwagę, że nadchodzi Chiński Nowy Rok, oto wyzwanie, aby obliczyć chińskiego zodiaku, żywioł i Taijitu na określoną datę.

Dane wejściowe powinny być datą:

1/31/2014

Data użyta tutaj jest stylem amerykańskim mm/dd/yyyy, ale alternatywnie może być stylem ISO-8601: yyyy-mm-ddwięc styl wprowadzania daty nie jest ścisły.

Wyjściem powinien być znak zwierzęcy w chińskim zodiaku zawierający element odpowiadający dacie i jego odpowiednik w Taijitu :

Horse - Wood - Yang

Tabelę pokazującą związek Zodiak - element - Taijitu można zobaczyć tutaj: Zodiak Chiński - Lata

Format wyjściowy nie jest ścisły, ale powinien zawierać zwierzę, element i komponent Taijitu i powinien być określony w pewien sposób.

Przykłady prawidłowych danych wyjściowych dla powyższej daty mogą obejmować:

(horse, wood, yang)
["Horse", "Wood", "Yang"]

Twój program powinien zwracać prawidłowe dane wyjściowe przez okres co najmniej 100 lat, w tym dzisiejszą datę. Oznacza to, że konieczne będzie uwzględnienie co najmniej dwóch 60-letnich ( płciowych ) cykli.

Mathematica 63

OK, może się to starzeć, ale działa (w wielu przypadkach wprowadzanie daty jest niejednoznaczne):

z=WolframAlpha[#<>" Chinese zodiac",{{"Result",1},"Plaintext"}] &

Przykład:

z@"1/31/2014"

„Koń (Yang Wood)”

C # - 357 337 339 bajtów

string Z(System.DateTime d){var c=new System.Globalization.ChineseLunisolarCalendar();var y=c.GetSexagenaryYear(d);var s=c.GetCelestialStem(y)-1;return",Rat,Ox,Tiger,Rabbit,Dragon,Snake,Horse,Goat,Monkey,Rooster,Dog,Pig".Split(',')[c.GetTerrestrialBranch(y)]+" - "+"Wood,Fire,Earth,Metal,Water".Split(',')[s/2]+" - Y"+(s%2>0?"in":"ang");}

Sformatowany:

string Z(System.DateTime d)
{
  var c = new System.Globalization.ChineseLunisolarCalendar();
  var y = c.GetSexagenaryYear(d);
  var s = c.GetCelestialStem(y) - 1;
  return
    ",Rat,Ox,Tiger,Rabbit,Dragon,Snake,Horse,Goat,Monkey,Rooster,Dog,Pig".Split(',')[c.GetTerrestrialBranch(y)]
    + " - "
    + "Wood,Fire,Earth,Metal,Water".Split(',')[s / 2]
    + " - Y" + (s % 2 > 0 ? "in" : "ang");
}

Python 2: 360 ^* 387 586 594 - Znaki

Zredukowane dalej

m,n,p=map(int,raw_input().split("/"));p-=1924;d=int("5od2nauh6qe4obvj8rf5pd2math6re3ocvi8sf5pd2l9uh6rf3nbvi7sg5pd2k9th6rf4navj7sg5oc1m9ti7qe3navj8sg5pc1math6qd3nbvj8sf4oc1ma"[p],36);p-=31*m-31+n<(d<21)*31+d;print"Rat Ox Tiger Rabbit Dragon Snake Horse Goat Monkey Rooster Dog Pig".split()[p%12],"Wood Fire Earth Metal Water".split()[p%10/2],["Yang","Yin"][p%2]

Powyższy kod działa w następującym przedziale: 5 lutego 1924 r. - 31 grudnia 2043 r

Przykład: po wklejeniu powyższego kodu do kursora interpretera python

>>> m,n,p=map(int,raw_input().split("/"));p-=1924;d=int("5od2nauh6qe4obvj8rf5pd2math6re3ocvi8sf5pd2l9uh6rf3nbvi7sg5pd2k9th6rf4navj7sg5oc1m9ti7qe3navj8sg5pc1math6qd3nbvj8sf4oc1ma"[p],36);p-=31*m-31+n<(d<21)*31+d;print"Rat Ox Tiger Rabbit Dragon Snake Horse Goat Monkey Rooster Dog Pig".split()[p%12],"Wood Fire Earth Metal Water".split()[p%10/2],["Yang","Yin"][p%2]

a następnie naciśnij Enter, wprowadź taką datę

6/13/2018

a następnie naciśnij Enterponownie, wyjście będzie

Dog Earth Yang

Ruby, 340

m,d,y=gets.split(?/).map(&:to_i);y+=1if 31*m+d-51>"d88jac8mlbuppp21ygmkjsnfsd4n3xsrhha4abnq9zgo6g2jupc39zav84434f75op4ftfhdcsa3xhc8nsw1ssw8p9qns1tf14mncy8j18msr9rsb7j7".to_i(36)>>5*y-9625&31
$><<[%w(Goat Monkey Rooster Dog Pig Rat Ox Tiger Rabbit Dragon Snake Horse)[y%12],%w(Metal Water Wood Fire Earth)[(y-1)/2%5],%w(Yin Yang)[y%2]]*' - '

Będzie to działać w dniach od 5 lutego 1924 r. Do 29 stycznia 2044 r.

GolfScript (212 znaków)

Używa znaków niedrukowalnych, więc oto wynik z xxd:

0000000: 272d 272f 6e2a 7e5c 2833 312a 2b5c 3a5e  '-'/n*~\(31*+\:^
0000010: 3139 2a22 d4e3 275a 747f 878c 70cb 996d  19*"..'Zt...p..m
0000020: a4f9 19e9 699e d818 bb61 c4e3 2232 3536  ....i....a.."256
0000030: 6261 7365 2033 6261 7365 5e31 3932 322d  base 3base^1922-
0000040: 3c7b 282d 7d2f 3330 2532 312b 3e5e 352d  <{(-}/30%21+>^5-
0000050: 2b3a 5e31 3225 2752 6174 0a4f 780a 5469  +:^12%'Rat.Ox.Ti
0000060: 6765 720a 5261 6262 6974 0a44 7261 676f  ger.Rabbit.Drago
0000070: 6e0a 536e 616b 650a 486f 7273 650a 476f  n.Snake.Horse.Go
0000080: 6174 0a4d 6f6e 6b65 790a 526f 6f73 7465  at.Monkey.Rooste
0000090: 720a 446f 670a 5069 6727 6e2f 3d6e 5e32  r.Dog.Pig'n/=n^2
00000a0: 2f35 2527 576f 6f64 0a46 6972 650a 4561  /5%'Wood.Fire.Ea
00000b0: 7274 680a 4d65 7461 6c0a 5761 7465 7227  rth.Metal.Water'
00000c0: 6e2f 3d6e 5e31 2627 5961 6e67 0a59 696e  n/=n^1&'Yang.Yin
00000d0: 276e 2f3d                                'n/=

Równoważny program, który używa znaków zmiany znaczenia, a zatem jest nieco dłuższy, to:

'-'/n*~\(31*+\:^19*"\xD4\xE3'Zt\x87\x8Cp\xCB\x99m\xA4\xF9\x19\xE9i\x9E\xD8\x18\xBBa\xC4\xE3"256base 3base^1922-<{(-}/30%21+>^5-+:^12%'Rat
Ox
Tiger
Rabbit
Dragon
Snake
Horse
Goat
Monkey
Rooster
Dog
Pig'n/=n^2/5%'Wood
Fire
Earth
Metal
Water'n/=n^1&'Yang
Yin'n/=

Interesującą częścią jest obliczanie, biorąc pod uwagę datę, czy to przed, czy po chińskim Nowym Roku, który przypada w tym roku gregoriańskim. Czerpiąc inspirację z wielkanocnego algorytmu obliczeniowego, którego użyłem w poprzednim pytaniu, szukałem dość prostego obliczenia daty nowego roku. W końcu poszedłem z prostą formułą, która prowadzi mnie przez większość drogi, a także tabelą odnośników dla terminu błędu.

Proste obliczenie to day_of_year = 21 + (19 * year % 30). Termin błędu mieści się w przedziale od 0do 8ponad zakresu zainteresowania (1924–2044) i nigdy nie zmienia się z roku na rok o więcej niż jeden, więc tabela przeglądowa jest zakodowana w zbalansowanym trójskładniku, a błąd jest obliczany poprzez zsumowanie terminów błędu prefiks tabeli.

C #, 630 611 604 572 570 bajtów, 120 lat

(dodaj ~ 2⅔ bajtów na dodatkowy rok, jeśli znasz przesunięcie)

Jest to dobre dla osób urodzonych od 31 stycznia 1900 r. Do 24 stycznia 2020 r. I prawdopodobnie ulegnie awarii poza tym zakresem. Czy są punkty bonusowe za liczbę lat objętych ubezpieczeniem?

string Z(DateTime date)
{
    int[] days = new int[] {  3, 22, 11,  1, 19,  7, -3, 16,  5, -6, 13,  2,
                             21,  9, -2, 17,  6, -5, 14,  4, 23, 11,  0, 19,
                              8, -3, 16,  5, -5, 13,  2, 20,  9, -2, 17,  7,
                             -4, 14,  3, 22, 11, -1, 18,  8, -3, 16,  5, -6,
                             13,  1, 20,  9, -1, 17,  6, -4, 15,  3, 21, 11,
                              0, 18,  8, -3, 16,  5, -7, 12,  2, 20,  9, -1,
                             18,  6, -5, 14,  3, 21, 10,  0, 19,  8, -3, 16,
                              5, 23, 12,  1, 20,  9, -1, 18,  7, -5, 13,  3,
                             22, 10,  0, 19,  8, -4, 15,  4, -6, 12,  1, 21,
                             10, -2, 17,  6, -5, 13,  3, 22, 11,  0, 19,  8 };
    string[] signs = "Rat,Ox,Tiger,Rabbit,Dragon,Snake,Horse,Goat,Monkey,Rooster,Dog,Pig".Split(',');
    string[] elements = "Metal,Water,Wood,Fire,Earth".Split(',');
    string[] polarities = new string[] { "Yang", "Yin" };
    int year = date.Year - 1900;
    int x = year - (date.DayOfYear < days[year] + 28 ? 1 : 0);
    return signs[x % 12] + " - " + elements[x / 2 % 5] + " - " + polarities[x % 2];
}

Lub skondensowane (z dodanymi podziałami linii):

string Z(DateTime d){
int y=d.Year-1900,
x=y-(d.DayOfYear<new[]{3,22,11,1,19,7,-3,16,5,-6,13,2,21,9,-2,17,6,-5,14,4,23,11,0,19,8,-3,16,5,-5,13,2,20,9,-2,17,7,-4,14,3,22,11,-1,18,8,-3,16,5,-6,13,1,20,9,-1,17,6,-4,15,3,21,11,0,18,8,-3,16,5,-7,12,2,20,9,-1,18,6,-5,14,3,21,10,0,19,8,-3,16,5,23,12,1,20,9,-1,18,7,-5,13,3,22,10,0,19,8,-4,15,4,-6,12,1,21,10,-2,17,6,-5,13,3,22,11,0,19,8}[y]+28?1:0);
return "Rat,Ox,Tiger,Rabbit,Dragon,Snake,Horse,Goat,Monkey,Rooster,Dog,Pig".Split(',')[x%12]+" - "+"Metal,Water,Wood,Fire,Earth".Split(',')[x/2%5]+" - "+new[]{"Yang","Yin"}[x%2];
}

Jednym z trików było ustalenie pochodzenia tabeli offsetów 28 stycznia. Okazało się, że ma najmniejszą liczbę znaków.

Jeśli przypadkiem nalega, aby dane wejściowe były ciągiem, dodaj 22 znaki, aby zmienić podpis metody na:

string Z(string i){

i dodaj wiersz:

var d=DateTime.Parse(i);

EDYCJE:

• Umieść wszystkie ciągi w jednej tablicy i dodaj przesunięcia do selektorów wyjściowych.
• Zmieniono przesunięcie dnia na 28 stycznia.
• string.Split()Inspiracja zaczerpnięta z odpowiedzi Eduarda Florinescu .
• Inline wszystkie tablice. Uratowało mi to tylko 2 postacie. : - /

Całkiem prosto z PHP za pomocą instrukcji Switch .

• Obliczenia są tak daleko, jak chcesz ...

  <?php
  
  // input the year
  $Y = 2020;
  
  // calculate the Z sign
  switch (($Y - 4) % 12) {
    case  0: $z = 'Rat';break;
    case  1: $z = 'Ox';break;
    case  2: $z = 'Tiger';break;
    case  3: $z = 'Rabbit';break;
    case  4: $z = 'Dragon';break;
    case  5: $z = 'Snake';break;
    case  6: $z = 'Horse';break;
    case  7: $z = 'Goat';break;
    case  8: $z = 'Monkey';break;
    case  9: $z = 'Rooster'; break;
    case 10: $z = 'Dog';break;
    case 11: $z = 'Pig';break;
  }
  
  // calculate the e
  switch (($Y / 2) % 5) {
    case  0: $e = 'Metal';break;
    case  1: $e = 'Water';break;
    case  2: $e = 'Wood'; break;
    case  3: $e = 'Fire'; break;
    case  4: $e = 'Earth'; break;
  }
  
  // calculate the polarity
   switch ($Y % 2) {
      case  0: $p = 'Yang';break;
      case  1: $p = 'Yin';break;
  
  }
  
   echo '$Y is $z - $e - $p.';