modGeneticDiversityServer: Genetic Diversity Module - Server Function
In nprcgenekeepr: Genetic Tools for Colony Management

modGeneticDiversityServer

R Documentation

Genetic Diversity Module - Server Function

Description

Assembles the live breeding-group, genetic-value, and kinship reactive inputs into the per-group heat-map statistics (via getGeneticDiversityStats) and renders the red/yellow/green heat map (via makeGeneticDiversityHeatmap). When breeding groups have not been formed or the genetic value analysis has not been run, the module shows guidance instead of an empty plot.

Usage

modGeneticDiversityServer(
  id,
  groups,
  pedigree,
  geneticValues,
  kinshipMatrix,
  currentDate = Sys.Date()
)

Arguments

`id`	character vector of length 1. Module namespace identifier.
`groups`	reactive returning a list of character vectors of animal IDs, one per breeding group (the `groups` returned by `modBreedingGroupsServer`).
`pedigree`	reactive returning the quality-controlled pedigree data frame.
`geneticValues`	reactive returning the genetic value report data frame (with `id` and `value` columns).
`kinshipMatrix`	reactive returning the full kinship matrix (row and column names are animal IDs).
`currentDate`	Date used to derive age and the production birth window. Defaults to `Sys.Date()`.

Value

A list with two reactive elements: stats, the per-group metric data frame (or NULL when data are not ready), and heatmap, the ggplot heat map (or NULL).

Other Shiny modules: modBreedingGroupsServer(), modBreedingGroupsUI(), modGeneticDiversityUI(), modGeneticValueServer(), modGeneticValueUI(), modGvAndBgDescServer(), modGvAndBgDescUI(), modInputServer(), modInputUI(), modORIPReportingServer(), modORIPReportingUI(), modPedigreeServer(), modPedigreeUI(), modPotentialParentsServer(), modPotentialParentsUI(), modPyramidServer(), modPyramidUI(), modSummaryStatsServer(), modSummaryStatsUI()