Folder containing executable R-script for O'Brien et al. 2019 Crocodylian Head Width Allometry. Includes subfolder with all data files necessary to replicate the analysis presented in the paper, as well as the code for BayesModelS written by Nunn and Zhu (2014). Note that Montsecosuchus deperetti is coded as its synonym, Alligatorium (Vidal, 1915) in the included R-script.

Summary of relative rate of spread R’ values for experiments for head fire and off-centre fire at the three spread intervals (Line 0—Line 1, Line 0—Line 2, Line 0—Line 3).

title: 'BellaBeat Fitbit' author: 'C Romero' date: 'r Sys.Date()' output: html_document: number_sections: true

toc: true

##Installation of the base package for data analysis tool
install.packages("base")

##Installation of the ggplot2 package for data analysis tool
install.packages("ggplot2")

##install Lubridate is an R package that makes it easier to work with dates and times.
install.packages("lubridate")
```{r}

##Installation of the tidyverse package for data analysis tool
install.packages("tidyverse")

##Installation of the tidyr package for data analysis tool
install.packages("dplyr")

##Installation of the readr package for data analysis tool
install.packages("readr")

##Installation of the tidyr package for data analysis tool
install.packages("tidyr")

Importing packages

metapackage of all tidyverse packages

library(base) library(lubridate)# make dealing with dates a little easier library(ggplot2)# create elegant data visialtions using the grammar of graphics library(dplyr)# a grammar of data manpulation library(readr)# read rectangular data text library(tidyr)

## Running code

In a notebook, you can run a single code cell by clicking in the cell and then hitting 
the blue arrow to the left, or by clicking in the cell and pressing Shift+Enter. In a script, 
you can run code by highlighting the code you want to run and then clicking the blue arrow
at the bottom of this window.

## Reading in files


```{r}
list.files(path = "../input")

# load the activity and sleep data set
```{r}
dailyActivity <- read_csv("../input/wellness/dailyActivity_merge.csv")
sleepDay <- read_csv("../input/wellness/sleepDay_merged.csv")

check for duplicates and na

sum(duplicated(dailyActivity)) sum(duplicated(sleepDay)) sum(is.na(dailyActivity)) sum(is.na(sleepDay))

now we will remove duplicate from sleep & create new dataframe

sleepy <- sleepDay %>% distinct() head(sleepy) head(dailyActivity)

count number of id's total sleepy & dailyActivity frames

n_distinct(dailyActivity$Id) n_distinct(sleepy$Id)

get total sum steps for each member id

dailyActivity %>% group_by(Id) %>% summarise(freq = sum(TotalSteps)) %>% arrange(-freq) Tot_dist <- dailyActivity %>% mutate(Id = as.character(dailyActivity$Id)) %>% group_by(Id) %>% summarise(dizzy = sum(TotalDistance)) %>% arrange(-dizzy)

now get total min sleep & lie in bed

sleepy %>% group_by(Id) %>% summarise(Msleep = sum(TotalMinutesAsleep)) %>% arrange(Msleep) sleepy %>% group_by(Id) %>% summarise(inBed = sum(TotalTimeInBed)) %>% arrange(inBed)

plot graph for "inbed and sleep data" & "total steps and distance"

ggplot(Tot_dist) + 
 geom_count(mapping = aes(y= dizzy, x= Id, color = Id, fill = Id, size = 2)) +
 labs(x = "member id's", title = "distance miles" ) +
 theme(axis.text.x = element_text(angle = 90)) 
 ```

Data set for publication in Evolutionary Applications. Short abstract: Wild animal populations experience selection pressures from both natural and anthropogenic sources. The availability of extensive pedigrees is increasing along with our ability to quantify the heritability and evolvability of phenotypic traits and thus the speed and potential for evolutionary change in wild populations. The environment may also affect gene expressions in individuals, which may in turn affect the potential of phenotypic traits to respond to selection. Knowledge about the relationship between the genetic and environmental components of phenotypic variation is particularly relevant, given ongoing anthropogenically driven global change

This dataset shows the student headcount for each individual NSW government school since 2004.\r \r Data Notes:\r \r * National Schools Statistics Collection (NSSC) enrolments collected as at the first Friday in August every year.\r \r * All NSSC enrolments are headcount figures for NSW government schools only.\r \r * Where a school had 5 or fewer students, the figure has been suppressed. A null figure indicates no enrolments were collected for NSSC in the given calendar year.\r \r Data Source:\r \r * Statistics Unit. Centre for Education Statistics and Evaluation.

The North Atlantic Marine Boundary Layer Experiment (NAMBLEX) campaign was conducted at Mace Head in Ireland from 24 July 2002 to 3 September 2002. During this campaign a suite of instruments, including several from the Universities Facility for Atmospheric Measurements (UFAM). This dataset consists of j(HCHO-R) readings taken every minute from the University of Leicester's spectral radiometer.

Video analysis of head impacts in top-level female football players during one season. Registration of both header and non-headers as well as analysis of of situation, mechanism and outcome of non-headers. Events that were suspected to be head injuries on video were compared with reports from the team medical staff. Data available in this repository are anonymized for data protection purposes, and not all analyses are reproducible. The codebook file shows which values describe which categories in the variabeles in the data set. Code is available for transparency, in files "descriptives.R", "header_vs_non-header.R" and "player_characteristics_and_age_analysis.R". Appendix file - R code output shows the results of the analyses conducted on the pseudo-anonymous data, and is the same as the one available with the article.

P-value >0.1, mean that there was no significant difference between adjacent groups.*P-value P-value >0.05, mean that there was difference between adjacent groups, but the difference was not significant.

This dataset includes surface underway data collected from R/V Ryofu Maru III cruises in the Pacific Ocean from 2020-01-10 to 2020-11-03. These data include partial pressure of carbon dioxide in the water, barometric pressure, sea surface salinity and sea surface temperature. The instruments used to collect these data include carbon dioxide (CO2) gas analyzer, shower head chamber equilibrator for autonomous carbon dioxide (CO2) measurement.

BackgroundIn first-line systemic therapy for unresectable recurrent and/or metastatic squamous cell carcinoma of the head and neck (R/M SCCHN), regimens are generally selected by time-to-relapse with 6 months cutoff after platinum (Pt)-containing definitive therapy, Pt-refractory or Pt-sensitive recurrence, but clinical characteristics between Pt-refractory and Pt-sensitive recurrence of R/M SCCHN has not been fully investigated. This study aimed to evaluate pattern of recurrence and efficacy for salvage treatment for recurrence after Pt-containing definitive therapy for R/M SCCHN in a real-world setting.MethodsWe retrospectively reviewed 150 patients treated with Pt-containing definitive therapy and analyzed the pattern of recurrence and efficacy of salvage therapy for 63 patients with R/M SCCHN.ResultsPt-refractory recurrence, Pt-sensitive recurrence, second primary cancer (SPC), and no relapse occurred in 23.3%, 18.7%, 14.7%, and 43.3% of patients, respectively. In the cases with distant metastatic recurrence, symptomatic recurrence was significantly more common in the Pt-refractory recurrence, while asymptomatic recurrence was significantly more common in the Pt-sensitive recurrence. The timing of detection of SPC was after 2 years in 59.0% of cases after the completion of definitive therapy and 63.6% of SPC were asymptomatic. There was a significant difference in ΔNLR2 (NLR after definitive therapy minus NLR at detection recurrence; p = 0.028) and in prognosis after the detection of recurrence for the overall population (p = 0.021), and for salvage treatment group (p = 0.023), and systemic therapy group (p = 0.003) between Pt-refractory and Pt-sensitive groups.Conclusions and SignificanceOur analysis revealed the recurrence pattern after Pt-containing definitive therapy and showed the validity of dividing patients into Pt-refractory and Pt-sensitive recurrence with different prognosis in salvage therapy, especially systemic therapy.

Linear regression analysis of selected predictor variables and milestone means.

Least square means (± SEM) of visual analog scale (VAS), leg movement, vocalizations and head movement during surgical castration and feeding behaviour after castration of weaned Angus crossbred calves with (M) or without (N) a single s.c. meloxicam injection and with (L) or without (R) a lidocaine ring block1.