File: rsu.sep.rs2st.R

package info (click to toggle)
r-cran-epir 2.0.80%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,332 kB
  • sloc: makefile: 5
file content (10 lines) | stat: -rw-r--r-- 398 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
 
rsu.sep.rs2st <- function(H = NA, N = NA, n, pstar.c, pstar.u, se.u = 1) {
  # Calculate cluster level sensitivities:
  sep.cluster <- rsu.sep.rs(N = N, n = n, pstar = pstar.u, se.u = se.u)
  
  # Calculate overall system sensitivity:
  sep <- rsu.sep.rsvarse(N = H, pstar = pstar.c, se.u = sep.cluster)
  
  rval <- list(se.p = sep, se.c = sep.cluster, se.u = se.u, N = N, n = n)
  rval
}