trying to fix error messages

This commit is contained in:
agdamsbo 2018-10-11 09:07:01 +02:00
parent 764fd90e27
commit b01fe47873
6 changed files with 16 additions and 53 deletions

BIN
.DS_Store vendored Normal file

Binary file not shown.

View File

@ -1,12 +1,12 @@
Package: daDoctoR Package: daDoctoR
Title: daDoctoR Type: Package
Version: 0.0.0.9004 Title: FUNCTIONS FOR HEALTH RESEARCH
Authors@R: c( Version: 0.1.0.9001
person("Andreas", "Gammelgaard Damsbo", email = "agdamsbo@pm.me", role = c("cre", "aut"))) Author@R: c(person("Andreas", "Gammelgaard Damsbo", email = "agdamsbo@pm.me", role = c("cre", "aut")))
Description: Tools for Danish health research. A collection of Maintainer: Andreas Gammelgaard Damsbo <agdamsbo@pm.me>
functions to ease my work. I'll try to keep it updated for Description: I am a Danish medical doctor involved in neuropsychiatric research.
others to use as well. Here I have collected functions I use for my data analysis. You are very
Depends: R (>= 3.4.4) welcome to get inspired or to use my work.
Imports: broom, Imports: broom,
dplyr, dplyr,
epiR, epiR,

View File

@ -1,39 +0,0 @@
# Intro
I try my best to share my basic workarounds in R to more effectively do statistical research. Feel free to be inspired or comment.
AS all functions have been collected in the package daDoctoR, please refer to the documentation there.
Install the package with the following command: devtools::install_github('agdamsbo/daDoctoR')
## Further research
In need of a suitable function to perform the chi-squared test of Hardy-Weinberg-equillibrium in my study poppulation, I ended up writing my own. It also contains a few summarise functions. This is actually the function I am most proud of, as it represents an actual universal test for both bi- and triallelic sustems in non-sexcromosome genes.
### Genotype distribution testing
- hwe_allele.R -- requires input in the form of two vectors with alleles listed
- hwe_geno.R -- requires input as numbers of each genotype (mm, mn, nn for biallelic systems and mm, mn, nn, mo, no, oo for triallelic)
- hwe.sum.R -- summarising tests for genotypes grouped by af factor. Performs HWE test for each group and returns neatly formatted distribution for easy copy-pasting to print. No comparisons of groups. Use the oddsratio or chisq.test.
### Formatting large data frames
- col_fact.R -- formatting columns as factor for names containing text elements of a vector provided. Labels or levels can be provided.
- col_num.R -- formatting columns as numeric for names containing text elements of a vector provided.
### Bivariate logistic regression analyses
- rep_glm.R -- for a stepwise gating regression approach this provides several bivariate logistic regression analyses for columns of a dataframe specified by af vector of the format c(). Use the dput() to obtain names of dataframe in correct format.
- rep_lm -- same as rep_glm, but for linear models
- rep_reg_cie.R -- Analysis of change in estimate approach with specified cut set at 10 % as standard.
### Publishin
- strobe_print.R -- regression analysis table complying with STROBE.
## Research year
Commands for extracting data from cpr-numbers:
- age_calc_function.R
- cpr_check_function.R
- cpr_sex_function.R
- date_convert_function.R
- dob_extract_cpr_function.R
All of these commands are written to work with the Danish Central Person Registry (CPR) numbers of the format ddmmyy-xxxx.

View File

@ -1,8 +1,6 @@
library(roxygen2) library(roxygen2)
library(devtools) library(devtools)
# Packing for publication
source("/Users/andreas/Documents/GitHub/daDoctoR/updatePackageVersion.R") source("/Users/andreas/Documents/GitHub/daDoctoR/updatePackageVersion.R")
setwd("/Users/andreas/Documents/GitHub/daDoctoR") setwd("/Users/andreas/Documents/GitHub/daDoctoR")

3
torubleshooting.R Normal file
View File

@ -0,0 +1,3 @@
## Looking for errors in code
for (f in list.files("/Users/andreas/Documents/GitHub/daDoctoR/R", full.names=TRUE)) parse(f)

View File

@ -10,3 +10,4 @@ setwd("/")
devtools::install_github('agdamsbo/daDoctoR') devtools::install_github('agdamsbo/daDoctoR')
library(daDoctoR) library(daDoctoR)