當前位置: 首頁>>代碼示例 >>用法及示例精選 >>正文


R sunspot.month 每月太陽黑子數據,從 1749 年至今


R語言 sunspot.month 位於 datasets 包(package)。

說明

來自世界數據中心(又名 SIDC)的每月太陽黑子數量。這是當新計數可用時偶爾會更新的數據版本。

用法

sunspot.month

格式

單變量時間序列 sunspot.yearsunspot.month 分別包含 289 個和 2988 個觀測值。這些對象屬於 "ts" 類。

例子

require(stats); require(graphics)
## Compare the monthly series
plot (sunspot.month,
      main="sunspot.month & sunspots [package'datasets']", col=2)
lines(sunspots) # -> faint differences where they overlap

## Now look at the difference :
all(tsp(sunspots)     [c(1,3)] ==
    tsp(sunspot.month)[c(1,3)]) ## Start & Periodicity are the same
n1 <- length(sunspots)
table(eq <- sunspots == sunspot.month[1:n1]) #>  132  are different !
i <- which(!eq)
rug(time(eq)[i])
s1 <- sunspots[i] ; s2 <- sunspot.month[i]
cbind(i = i, time = time(sunspots)[i], sunspots = s1, ss.month = s2,
      perc.diff = round(100*2*abs(s1-s2)/(s1+s2), 1))

## How to recreate the "old" sunspot.month (R <= 3.0.3):
.sunspot.diff <- cbind(
    i = c(1202L, 1256L, 1258L, 1301L, 1407L, 1429L, 1452L, 1455L,
          1663L, 2151L, 2329L, 2498L, 2594L, 2694L, 2819L),
    res10 = c(1L, 1L, 1L, -1L, -1L, -1L, 1L, -1L,
          1L, 1L, 1L, 1L, 1L, 20L, 1L))
ssm0 <- sunspot.month[1:2988]
with(as.data.frame(.sunspot.diff), ssm0[i] <<- ssm0[i] - res10/10)
sunspot.month.0 <- ts(ssm0, start = 1749, frequency = 12)

作者

R

來源

WDC-SILSO,太陽影響數據分析中心 (SIDC),比利時皇家天文台,Av. Circulaire, 3, B-1180 布魯塞爾 目前位於http://www.sidc.be/silso/datafiles

也可以看看

sunspot.monthsunspots 的更長版本;後者運行到 1983 年並保持固定(為了作為示例數據集的再現性)。

相關用法


注:本文由純淨天空篩選整理自R-devel大神的英文原創作品 Monthly Sunspot Data, from 1749 to "Present"。非經特殊聲明,原始代碼版權歸原作者所有,本譯文未經允許或授權,請勿轉載或複製。