MonthlyWtsFromPhi_ctau_p: Weights from Phi_c and tau_p

Description Usage Arguments Value Examples

View source: R/sedproxy-interface.R

Description

Weights from Phi_c and tau_p

Usage

1
MonthlyWtsFromPhi_ctau_p(phi_c, tau_p, n.wts = 12)

Arguments

n.wts

Number of required weights

Value

A named vector of 0/1 weights

Examples

1
2
3
4
5
6
n.wts <- 12
wts <- MonthlyWtsFromPhi_ctau_p(phi_c = 0, tau_p = 0.1/n.wts, n.wts = n.wts)
wts.col <- rep("Black", n.wts)
wts.col[wts == 1] <- "Red"
plot(1:n.wts, cos(seq(pi, 3*pi - 2*pi/n.wts, length.out = n.wts)),
     col = wts.col, pch = 16, type = "b")

EarthSystemDiagnostics/spectraluncertainty documentation built on Jan. 8, 2020, 9:43 a.m.