Last data update: 2014.03.03

R: Sperm Precedence Data from the Rough-Skinned Newt
newtR Documentation

Sperm Precedence Data from the Rough-Skinned Newt

Description

Offspring counts from two clutches and proportional paternity by mating order for a breeding experiment of the rough-skinned newt conducted by Jones et al., (2002)

Usage

data(newt)

Format

A data frame with 10 observations on the following 10 variables.

Female

a numeric code to identify females.

No_1st_Clutch

total offspring in the first clutch.

P2_1

proportional paternity of the second male for the first clutch.

No_2nd_Male_1st_Clutch

total offspring sired by the second male from the first clutch.

No_2nd_Clutch

total offspring in the second clutch.

P2_2

proportional paternity of the second male for the second clutch.

No_2nd_Male_2nd_Clutch

total offspring sired by the second male from the second clutch.

Total_2nd_Male

total offspring sired by the second male from both clutches.

Total_Offspring

total offspring for both clutches.

Total_P2

total overall proportional paternity of the second male for both clutches.

Source

A. G. Jones, E. M. Adams, and S. J. Arnold (2002) A mechanism of first-male precedence in a vertebrate. Proceedings of the National Academy of Sciences of the United States of America 99, 2078-2081.

Examples

#Fit newt data to the Poisson distribution and test goodness of fit.
data(newt)
fit_dist_pois(newt$Total_Offspring)

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(ABCp2)
Loading required package: MASS
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/ABCp2/newt.Rd_%03d_medium.png", width=480, height=480)
> ### Name: newt
> ### Title: Sperm Precedence Data from the Rough-Skinned Newt
> ### Aliases: newt
> ### Keywords: datasets
> 
> ### ** Examples
> 
> #Fit newt data to the Poisson distribution and test goodness of fit.
> data(newt)
> fit_dist_pois(newt$Total_Offspring)
$data_pois
 [1] 183 167 186 177 186 167 188 174 150 171

$fit_pois
     lambda  
  172.400000 
 (  4.152108)

$chi_pois

	Pearson's Chi-squared test

data:  dist and data_pois
X-squared = 70, df = 63, p-value = 0.2544


Warning message:
In chisq.test(dist, data_pois) : Chi-squared approximation may be incorrect
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>