From b2d90e19e7e4fa478b4ba1c2dce02a6a728041e3 Mon Sep 17 00:00:00 2001 From: rowlandseymour Date: Fri, 1 Nov 2024 13:39:22 +0000 Subject: [PATCH] Typos and remove braces --- DESCRIPTION | 2 +- R/functions.R | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index ab76ac4..2e91bea 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -9,7 +9,7 @@ Authors@R: comment = c(ORCID = "0000-0002-8739-3921"))) Description: A suite of functions that allow a full, fast, and efficient Bayesian treatment of the Bradley--Terry model. Prior assumptions about the model parameters can be encoded through a multivariate normal prior distribution. - Inference is performed using a Polya-Gamma latent variable representation of the model. + Inference is performed using a latent variable representation of the model. License: GPL (>= 3) Encoding: UTF-8 LazyData: true diff --git a/R/functions.R b/R/functions.R index ef5ac4c..19a40ce 100755 --- a/R/functions.R +++ b/R/functions.R @@ -4,7 +4,7 @@ #' #' @param n.objects The number of areas in the study. #' @param comparisons An N x 2 data frame, where N is the number of comparisons. Each row should correspond to a judgment. The first column is the winning object, the second column is the more losing object. The areas should be labeled from 1 to n.objects. -#' @return A matrix where the {i, j}th element is the number of times object i beat object j. +#' @return A matrix where the i, j th element is the number of times object i beat object j. #' #' @examples #' @@ -175,7 +175,7 @@ construct.design.matrix.both.ways <- function (n.objects) { #' 0 if player 1 is the winner #' @param player1 vector of first players #' @param player2 vector of second players -#' @param win.matrix a win-loss matrix where the {i,j}th element is the number of +#' @param win.matrix a win-loss matrix where the i,j th element is the number of #' times object i beat object j #' @param player.prior.var (optional) matrix specifying the prior covariance of #' the player correlation parameters @@ -868,7 +868,7 @@ BBTm.with.formula <- function(outcome, player1, player2, #' #' If `beta.initial`is omitted, it is set to a vector of zeroes. #' -#' If `kappa.var` is omitted, it is set to N(0, 5^2), if `kappa.intial` is omitted +#' If `kappa.var` is omitted, it is set to N(0, 5^2), if `kappa.initial` is omitted #' it is set to 0.5. #' #'