web-dev-qa-db-ja.com

R / Shiny-Sys.Date()で現在の年を取得する方法は?

Sys.Date()で現在の年を取得するにはどうすればよいですか?

私はこのコードを以下に持っています、

      selectInput(
        inputId = "year",
        label = "Year:",
        choices = c(2014:Sys.Date())
        )

結果、

<select id="year"><option value="2014" selected>2014</option>
<option value="2015">2015</option>
<option value="2016">2016</option>
<option value="2017">2017</option>
<option value="2018">2018</option>
<option value="2019">2019</option>
<option value="2020">2020</option>
....
<option value="16582">16582</option></select>

でも必要なのは

<select id="year">
    <option value="2014" selected>2014</option>
    <option value="2015">2015</option>
</select>

何か案は?

13
laukok

ここでは、format()のヘルプページで概説されているように、Sys.Date()関数を使用できます。見る ?strptimeすべての異なる仕様:

> c(2014, format(Sys.Date(), "%Y"))
[1] "2014" "2015"

実際に整数値が必要な場合:

> c(2014L, as.integer(format(Sys.Date(), "%Y")))
[1] 2014 2015
23
Chase

あなたはこれを行うことができませんでした:

_choices = c(2014:lubridate::year(Sys.Date()))
_

lubridateを使用してSys.Date()から年を取得しますか?

2
jalapic