knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "README-"
)

Examples

Here is an example of how to use some of the dyadr functions.

library(nlme)
library(dyadr)

Using the apim function

apim("x")

Using the smallsummary function

apimi <- gls(Satisfaction_A ~ Tension_A + SelfPos_P,
  na.action = na.omit,
  correlation = corCompSymm(form = ~ 1 | CoupleID),
  data = acipair
)

smallsummary(apimi)

Using the crsp function

# Empty Model
apimie <- summary(gls(Satisfaction_A ~ 1,
  na.action = na.omit,
  correlation = corCompSymm(form = ~ 1 | CoupleID),
  data = acipair
))
# sd of errors for the model or esd
esd <- as.numeric(apimi[6])
# sd of errors for the empty model or esd0
esd0 <- as.numeric(apimie[6])
# the R squared, using the crsp function
crsp(esd, esd0)

Using the lincomb function

apimi <- nlme::gls(Satisfaction_A ~ Tension_A + SelfPos_P,
  na.action = na.omit,
  correlation = corCompSymm(form = ~ 1 | CoupleID),
  data = acipair
)
lincomb(apimi, 2, 3)

Using variable_view function

variable_view(dyadic_trade)


RandiLGarcia/dyadr documentation built on March 23, 2021, 3:33 a.m.