チャレンジ

現在の年から120年前までの年のリストを出力します。すべての生きている人間の誕生年は、このリストに含まれます。

詳細

リストは降順でなければなりません。

配列やリストを操作するためのすべての組み込み関数が許可されています。

バイト単位の最短コードが優先されます。

今年実行すると、出力は

2016, 2015, ..., 1897, 1896

来年実行すると、出力は

2017, 2016, ..., 1898, 1897

等。

更新

• リストの形式について尋ねた人もいます。ほとんどの人が推測しているように、それは問題ではありません。数字の間に区切り記号を挿入します。直観的にほとんどの場合、コンマまたはスペース、あるいはその両方が挿入され、改行または配列が出力されます。
• ジャンヌ・カルメントのような準超人は、私の質問で述べられた規則の例外です。

パイク、6バイト

wC7m-

ここで試してみてください！

w     - 121
   m- - for i in range(^):
 C7   -  current_year-i

（の後w、153のコードポイントは存在しますが、印刷できません）

Pyth、11 9 8バイト

-L.d3C\y

範囲にわたってマッピングし[0...120]、現在の年からすべての数値を減算することにより機能します。範囲は121、マップ引数として使用することにより暗黙的に構築されます。間の分離の空白を回避するために、.d3そして121私たちは、変換することによって、この番号を取得するyことのコードポイントに。
このアプローチを思いついた@FryAmTheEggmanに感謝します！

ここで試してみてください！

古い9バイトソリューション：

_>121S.d3

ここで試してみてください！

範囲[1...<current year>]を構築し、その最後の121要素のみを取ります。

R、34バイト

(format(Sys.Date(),"%Y"):0)[1:121]

オンライン通訳についてはこちらをご覧ください。

を使用して編集を33バイトに減らすことができますsubstr。

(substr(Sys.Date(),1,4):0)[1:121]

しかし技術的には、このソリューションは9999-12-31までしか機能しません。

AngularJS + Lodash、274バイト

angular.module('x',[]).controller('x',['$scope',function(x){x.x=_.range(9,new Date().getFullYear()+1).slice(-121).reverse()}])

<script src=//goo.gl/M5LvGe></script><script src=//goo.gl/opljJl></script><select ng-app=x ng-controller=x multiple><option ng-repeat="x in x">{{x}}

出力

BASH + coreutils、35 33バイト

x=`date +%Y`;seq $x -1 $((x-120))

CJam、14 12 11バイト

Sp3000のおかげで2バイト、Martin Enderのおかげで1バイト節約

et0=121,f-p

オンラインでお試しください！

説明

et0=         e# Push the current year
    121,     e# Push the range 0, 1, ..., 120
        f-   e# For each item in the range, subtract it from current year
          p  e# Print the array

HP50g RPL、97バイト

120 'S' STO DATE ->STR 6 9 SUB OBJ-> 'Y' STO {} S WHILE 0 >= REPEAT Y S - + 'S' DECR END REVLIST

ゴルフをしていない：

120
'span' STO     @ Store the span of years to cover.
DATE           @ Get the date as number 11.082016. 
→STR           @ Convert to string "11.082016".
               @ (Number format must allow all these decimal places.)
6 9 SUB        @ "11.082016" Substring for the year.
               @       ^  ^
               @  123456789
OBJ→           @ Convert string to number.
'year' STO     @ Store as the year to start at.
{} span        @ Start empty list to collect the years.
               @ Leave loop counter on the stack.
WHILE 0 ≥      @ Loop until the counter goes negative.
REPEAT
  year span -  @ E.g. on first iteration: 2016 - 120 = 1896.
  +            @ Append the year to the list on the stack.
  'span' DECR  @ Decrement loop counter and leave on stack.
END
REVLIST        @ Put list in reverse chronological order.

2016年から1896年までのリストを表示：

05AB1E、8 7バイト

コード：

žg120Ý-

説明：

žg         # Get the current year.
  120Ý     # Create the list [0, 1, ..., 119, 120].
      -    # Substract, which leaves [year - 0, year - 1, ..., year - 120].

CP-1252エンコードを使用します。オンラインでお試しください！。

PowerShell、26 24バイト

@TimmyD改良版：

0..120|%{(date).Year-$_}

だった：

($d=(date).year)..($d-120)

どこでdate走るGet-Date

Dyalog APL、11 10 バイト

120↑⌽⍳⊃⎕ts

120↑ 120要素を取ります

⌽ 逆の

⍳ までのインデックス

⊃ の最初の要素

⎕TS [YYYY、M、D、h、m、s、t]形式のタイムスタンプ

TryAPLオンライン！

古いバージョン：

(⊃⎕TS)-⍳120

⊃⎕TS [YYYY、M、D、h、m、s、t]の最初の要素

- マイナス

⍳120 [0、1、2、...、118、119]

が必要⎕IO←0です。これは多くのシステムでデフォルトです。

TryAPLオンライン！

Vitsy + * sh + JavaScript、33 26 21 18バイト

Vitsyにはネイティブの時刻/日付検索機能がないため、このためにシェルとevalを使用する必要がありました。

@Calebに、さらに3バイトを削減してくれてありがとう！

'Y%+ etad',Dca*-HZ

'Y%+ etad'               Push the string 'date +"%Y"' to the stack.
          ,              Execute through shell. 
           Dca*-         Dupe n, push n - 120.
                H        Pop x, y, push range(x, y) to the stack.
                 Z       Output all stack as characters.

これはシェルとevalの両方を使用するため、オンラインで試すことはできません。

出力は文字コードです。

Mathematica / Wolfram言語、28バイト

Date[][[1]]-#&/@Range[0,120]

R、47 39バイト

as.double(substr(Sys.Date(),1,4))-0:120

頻繁に使用される便利なシステム関数を短縮して、RのUTF-8実装を誰かが発明した場合...

UPD：7削り取らに起因バイト（！）plannapus、subrtacting示唆した0:120ベクトルではなく、からのカウントaに(a-120)し、1バイトの恵みà user5957401を、それが気づいたdoubleだけでなく、動作しますnumeric。古いバージョン：

a=as.numeric(format(Sys.Date(),"%Y"));a:(a-120)

MATL、10バイト

1&Z'0:120-

オンラインでお試しください！

1&Z'      % Push first component of "clock" vector, which is year
0:120     % Literal vector [0, 1, 2, ..., 120]
-         % Subtract element-wise. Implicitly display

05AB1E、9バイト

121FžgN-=

オンラインで試す

php、73 66 58 42バイト

<?=implode(', ',range($j=date(Y),$j-120));

出力：

2016、2015、2014、2013、2012、2011、2010、2009、2008、2007、2006、2005、2004、2003、2002、2001、2000、1999、1998、1997、1996、1995、1994、1993、1992、 1991、1990、1989、1988、1987、1986、1985、1984、1983、1982、1981、1980、1979、1978、1977、1977、1976、1975、1974、1973、1972、1971、1970、1969、1968、1967、 1966、1965、1964、1963、1962、1961、1960、1959、1958、1957、1956、1955、1954、1953、1952、1951、1950、1949、1948、1947、1946、1945、1944、1943、1942、 1941、1940、1939、1938、1937、1936、1935、1934、1933、1932、1931、1930、1929、1928、1927、1926、1925、1924、1923、1922、1921、1920、1919、1918、1917、 1916、1915、1914、1913、1912、1911、1910、1909、1908、1907、1906、1905、1904、1903、1902、1901、1900、1899、1898、1897、1896

で区切る必要がない場合,、58 57 41バイト：

<?=implode(' ',range($j=date(Y),$j-120));

16バイトを保存してくれたinsertusernamehereに感謝します

Python 2、64 62 54バイト

import time
n=time.gmtime()[0]
exec'print n;n-=1;'*121

@KarlKastor 8バイトありがとう！

PostgreSQL、57バイト

誰が必要ですFROM:-)。おそらく動作しないはずですが、動作します。sqlfiddleで試してください

select date_part('y',current_date)-generate_series(0,120)

OS XでのBash、23

jot 121 `date +%Y` - -1

これは、BSDがjotインストールされている場合（たとえば、sudo apt-get install athena-jot。

Python 2、62バイト

import time
for n in range(121):print int(time.ctime()[-4:])-n

そして、64バイトで：

for n in range(121):print int(__import__("time").ctime()[-4:])-n

Oracle SQL 11.2、111バイト

SELECT LISTAGG(TO_CHAR(SYSDATE,'YYYY')-LEVEL+1,', ')WITHIN GROUP(ORDER BY LEVEL)FROM DUAL CONNECT BY LEVEL<122;

処理、51 42 41バイト

for(int i=0;i<121;)print(year()-i+++" ");

非ゴルフ

for(int i = 0; i < 121;)
    print(year() - i++ + " ");

Processingは、知らない場合はJavaの単なるラッパーであり、定型文のほとんどを取り去るため、明らかなソリューションはJavaバージョンに比べて非常に短いものです。また、グラフィックスを描画するためのウィンドウを開きますが、それが私を失格させるとは思われません:)

MATLAB、18バイト

出力形式が重要でないと仮定すると（降順は別として）、次のプログラムは、現在のものから過去121年間を出力します。

year(date)-(0:120)

MATLABバージョンr2014a以降が必要です。以前のバージョンにはyear関数が含まれていませんでした。

JavaScript、55 52 50 49バイト

for(a=d=s=Date().substr(11,4);d-->s-120;)a+=" "+d

alertデータに+9バイト（これをコンソールで実行する場合は不要）。

for(a=d=s=Date().substr(11,4);d-->s-120;)a+=" "+d;alert(a)

区切り文字が不要な場合は-4バイト。

for(a=d=s=Date().substr(11,4);d-->s-120;)a+=d

for (a = d = s = Date().substr(11, 4); d --> s - 120; )
    a += " " + d;
console.log(a);

C、87 85 76 74 65バイト

main(int i,char**v){for(i=0;i<121;printf("%d,",atoi(v[1])-i++));}

ゴルフをしていない：

main(int i,char**v){
    for(i = 0; i < 121; printf("%d,", atoi(v[1])-i++));
}

私の最初のコードゴルフ-任意のポインターが好評です。私はのargc / argvのジャンクを切り出すことができればいいが、私はないんだけどだろうということ熟練したAのCプログラマ。改善を歓迎します。

編集：現在の年は、コマンドラインから取得されます-具体的には、自動化され、よく訓練された飲酒鳥のグループによって取得されます。

編集2：Easterly Irkのおかげで85バイト（引数関数パラメータの周りのスペースを削除）

編集3 3：76バイト明白な（詳細なargc / argvパラメータ名を削除）を指摘してくれたanatolygに感謝

編集4：Yay295のおかげで74バイト（char ** v、年区切り文字を変更）

編集5：Yay295とmattのおかげで65バイト（変数iの再利用、変数xの削除、forループへの変更、printfにatoi（）readとi ++を含めるように更新）

JavaScript、60 53 48バイト

f=x=>x>Date().split` `[3]-121&&(alert(x),f(x-1))

再帰的なソリューションを使用しました。

Perl、33バイト

say+(gmtime)[5]-$_+1900for 0..120

-M5.010またはで実行-E：

perl -E 'say+(gmtime)[5]-$_+1900for 0..120'

k、27バイト

指定どおりに出力

1@", "/:$(`year$.z.d)-!121;

例：

k)1@", "/:$(`year$.z.d)-!121;
2016, 2015, 2014, 2013, 2012, 2011, 2010, 2009, 2008, 2007, 2006, 2005, 2004, 2003, 2002, 2001, 2000, 1999, 1998, 1997, 1996, 1995, 1994, 1993, 1992, 1991, 1990, 1989, 1988, 1987, 1986, 1985, 1984, 1983, 1982, 1981, 1980, 1979, 1978, 1977, 1976, 1975, 1974, 1973, 1972, 1971, 1970, 1969, 1968, 1967, 1966, 1965, 1964, 1963, 1962, 1961, 1960, 1959, 1958, 1957, 1956, 1955, 1954, 1953, 1952, 1951, 1950, 1949, 1948, 1947, 1946, 1945, 1944, 1943, 1942, 1941, 1940, 1939, 1938, 1937, 1936, 1935, 1934, 1933, 1932, 1931, 1930, 1929, 1928, 1927, 1926, 1925, 1924, 1923, 1922, 1921, 1920, 1919, 1918, 1917, 1916, 1915, 1914, 1913, 1912, 1911, 1910, 1909, 1908, 1907, 1906, 1905, 1904, 1903, 1902, 1901, 1900, 1899, 1898, 1897, 1896

出力をフォーマットせず、単に整数のリストを返すだけで、さらに短縮できます。

(`year$.z.d)-!121

jq、46文字

（45文字のコード+ 1文字のコマンドラインオプション）

now|strftime("%Y")|tonumber|range(.;.-121;-1)

サンプル実行：

bash-4.3$ jq -n 'now|strftime("%Y")|tonumber|range(.;.-121;-1)' | head
2016
2015
2014
2013
2012
2011
2010
2009
2008
2007

オンラインテスト

Vim、32 29キーストローク

@danieroに、キーストロークの保存と出力のすっきりした作成の手助けをしてくれてありがとう。

"=strftime('%Y')<Enter>pqqYp<Ctrl-x>q118@q

• <Enter> は Enter
• <Ctrl-x>ありますCtrl+X

説明：

"                                          # Put into the register {
 =strftime('%Y')                           #   This year in YYYY form
                <Enter>                    # }
                       p                   # Paste the register
                        qq                 # Record macro q {
                          Y                #   Yank (copy) the current line
                           p               #   Paste
                            <Ctrl-x>       #   Decrment number at cursor
                                    q      # }
                                     118@q # Do macro q 118 times

出力フォーマット：

各番号は、次のような個別の行にあります。

2016
2015
.
.
.
1898
1897