knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "100%" )
The project website is available under https://pvrqualitasag.github.io/qprppedigree/
The goal of qprppedigree is to check for certain properties of animal pedigrees
You can install the development version from GitHub with:
# install.packages("devtools") devtools::install_github("pvrqualitasag/qprppedigree")
This is a basic example which shows you how to solve a common problem:
library(qprppedigree) ## basic example code s_pedigree <- system.file('extdata', 'PopReport_SN_ohne_20210115.csv_adaptfin2.csv', package = 'qprppedigree') check_pedig_parent(ps_pedig_path = s_pedigree)
Pedigrees can be checked wether they contain loops with the following command
s_pedi_path <- system.file('extdata','data_sample2.csv', package = 'qprppedigree') check_cycle_pedigree(ps_pedig_path = s_pedi_path)
cat(rmdhelp::get_latest_change(), "\n")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.