add calculate_ieqtls

NAMESPACE

@@ -2,6 +2,7 @@
 
 export(available_tissueSiteDetailIds)
 export(calculate_eqtls)
+export(calculate_ieqtls)
 export(get_annotation)
 export(get_collapsed_gene_model_exon)
 export(get_dataset_info)

R/calculate_ieqtls.R

@@ -0,0 +1,30 @@
+#' Calculate Ieqtls
+#'
+#'Calculate your own Cell Specific eQTLs.
+#'
+#'- This service calculates the gene-variant association for any given pair of gene and variant, which may or may not be significant.
+#'- This requires as input a GENCODE ID, GTEx variant ID, and tissue site detail ID.
+#'By default, the calculation is based on the latest GTEx release.
+#'
+#' @inheritParams gtexr_arguments
+#'
+#' @return A tibble.
+#' @export
+#' @family Dynamic Association Endpoints
+#'
+#' @examples
+#' \dontrun{
+#' # perform request
+#' calculate_eqtls(cellType = "Adipocytes", tissueSiteDetailId = "Whole_Blood",
+#'                gencodeId = "ENSG00000203782.5",
+#'                variantId = "rs79641866")
+#'}
+calculate_ieqtls <-
+  function(cellType,
+           tissueSiteDetailId,
+           gencodeId,
+           variantId,
+           datasetId = "gtex_v8") {
+    gtex_query(endpoint = "association/dynieqtl")
+  }
+

R/gtexr_arguments.R

@@ -9,6 +9,8 @@
 #' @param autolysisScores Character vector. Options: "None", "Mild", "Moderate",
 #'   "Severe".
 #' @param bp_window Integer.
+#' @param cellType String. "Adipocytes", "Epithelial_cells", "Hepatocytes",
+#'   "Keratinocytes", "Myocytes", "Neurons", "Neutrophils".
 #' @param chromosome String. One of "chr1", "chr2", "chr3", "chr4", "chr5",
 #'   "chr6", "chr7", "chr8", "chr9", "chr10", "chr11", "chr12", "chr13",
 #'   "chr14", "chr15", "chr16", "chr17", "chr18", "chr19", "chr20", "chr21",
@@ -97,6 +99,7 @@ gtexr_arguments <- function() {
     "aliquotIds", "character", FALSE, TRUE,
     "autolysisScores", "character", FALSE, TRUE,
     "bp_window", "integer", TRUE, FALSE,
+    "cellType", "character", TRUE, FALSE,
     "chromosome", "character", TRUE, FALSE,
     "datasetId", "character", TRUE, FALSE,
     "dataTypes", "character", FALSE, TRUE,