| plot.sh | R Documentation | 
Makes a radar plot showing the individual genetic worth for the Smith-Hazel index
## S3 method for class 'sh'
plot(
  x,
  SI = 15,
  radar = TRUE,
  arrange.label = FALSE,
  size.point = 2.5,
  size.line = 0.7,
  size.text = 10,
  col.sel = "red",
  col.nonsel = "black",
  ...
)
x | 
 An object of class   | 
SI | 
 An integer (0-100). The selection intensity in percentage of the total number of genotypes.  | 
radar | 
 Logical argument. If true (default) a radar plot is generated
after using   | 
arrange.label | 
 Logical argument. If   | 
size.point | 
 The size of the point in graphic. Defaults to 2.5.  | 
size.line | 
 The size of the line in graphic. Defaults to 0.7.  | 
size.text | 
 The size for the text in the plot. Defaults to 10.  | 
col.sel | 
 The colour for selected genotypes. Defaults to   | 
col.nonsel | 
 The colour for nonselected genotypes. Defaults to   | 
... | 
 Other arguments to be passed from ggplot2::theme().  | 
An object of class gg, ggplot.
Tiago Olivoto tiagoolivoto@gmail.com
library(metan)
vcov <- covcor_design(data_g, GEN, REP, everything())
means <- as.matrix(vcov$means)
pcov <- vcov$phen_cov
gcov <- vcov$geno_cov
index <- Smith_Hazel(means, pcov = pcov, gcov = gcov, weights = rep(1, 15))
plot(index)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.