View simulate.gamm.R
`simulate.gamm` <- function(object, nsim = 1, seed = NULL, newdata,
freq = FALSE, unconditional = FALSE, ...) {
if (!exists(".Random.seed", envir = .GlobalEnv, inherits = FALSE))
runif(1)
if (is.null(seed))
RNGstate <- get(".Random.seed", envir = .GlobalEnv)
else {
R.seed <- get(".Random.seed", envir = .GlobalEnv)
set.seed(seed)
RNGstate <- structure(seed, kind = as.list(RNGkind()))
View ShinyPerspectivePlot.R
library("shiny")
library("shinyjs")
ui <- shinyUI(pageWithSidebar(
titlePanel("", "3D Perspective Plot for Interaction Effects"),
sidebarPanel(
tabsetPanel(
tabPanel("Data",
View beamer_two_col.Rmd
title author date output
Untitled
Jeff W. Hollister
2/2/2016
beamer_presentation
knitr::opts_chunk$set(echo = FALSE)
View gist:d2ee89f78a5a85dc4b1593e7bf82afe9
- https://mvuorre.github.io/r/ggplot2-visualizing-prior-posterior/
- https://users.soe.ucsc.edu/~draper/beta-distributions-r.txt
- http://shinyapps.org/apps/RGraphCompendium/index.php#prior-and-posterior
- https://alexanderetz.com/2015/07/25/understanding-bayes-updating-priors-via-the-likelihood/
- http://doingbayesiandataanalysis.blogspot.com.es/2015/10/posterior-predicted-distribution-for.html
- http://www.stat.cmu.edu/~hseltman/rube/rubeManual.pdf
- http://stackoverflow.com/questions/19476744/how-to-plot-bayesian-prior-and-posterior-distributions-in-one-panel-using-r
View themes.R
### My favourite ggplot2 themes, always accessible ###
## just source this gist from any project ##
#####################################################################################
# Noam's default ggplot2 styling #####
# Source: https://github.com/noamross/noamtools/blob/master/R/theme_nr.R
theme_nr <-theme(text=element_text(family="Helvetica", size=14),
panel.grid.major.x=element_blank(),
View RFetchClimate.md

New R package to fetch climate data from FetchClimate webservice

Francisco Rodriguez-Sanchez
22 April 2016

Trying new RFc package to get climate data into R from FetchClimate service.

See all the available climate variables here.

View rootdir.R
library(rprojroot)
root <- find_rstudio_root_file()
View Rpres_fontsize.Rpres
Example slide
==============
<font size = "5px">
```{r echo = FALSE}
cleandata <- read.csv(file.path(root, "inst/extdata/coordsdata.csv"))
studies <- count(cleandata, ref, species, variable)
kable(studies)
```