knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)

qpdt

The website of qpdt is available under https://fbzwsqualitasag.github.io/qpdt/

The goal of qpdt is to provide a package with generic pedigree tools used at Qualitas AG.

Installation

You can install the development version from GitHub with:

# install.packages("devtools")
devtools::install_github("fbzwsqualitasag/qpdt")

Example

This is a basic example which shows you how basic properties of a pedigree can be checked:

library(qpdt)
## basic example code
s_pedigree <- system.file('extdata',
                          'PopReport_SN_ohne_20210115.csv_adaptfin2.csv',
                          package = 'qpdt')
check_pedig_parent(ps_pedig_path = s_pedigree)

If you want to find whether a certain pedigree contains cycles the following statements provides an anser.

s_pedi_path <- system.file('extdata','data_sample_cycle.csv', package = 'qpdt')
check_cycle_pedigree(ps_pedig_path = s_pedi_path)
cat(rmdhelp::get_latest_change(), "\n")


fbzwsqualitasag/qpdt documentation built on April 5, 2021, 9:28 p.m.