David LeBauer dlebauer

Environment comparisons

This folder contains code used to compare setaria growth in different environments.

	select
	t.treatment_id :: text as treatmentDbId,
	t.site_id :: text as observationUnitDbId,
	t.variable_id :: text as observationVariableDbId,
	v.name as observationVariableName,
	t.id :: text as observationDbId,
	t.mean :: text as value,
	t.date as observationTimeStamp,
	s.sitename as observationUnitName,
	t.cultivar_id :: text as germplasmDbId,

	<?xml version="1.0"?><pecan>
	<info>
	<notes/>
	<userid>-1</userid>
	<username/>
	<date>2021/01/28 19:56:08 +0000</date>
	</info>
	<outdir>/data/workflows/PEcAn_99000000009</outdir>
	<database>
	<bety>

	library(tidyverse)
	library(wesanderson)
	library(cowplot)
	library(lubridate)
	allfields <- read_csv('~/Downloads/canopycover_ratiomask.csv') %>%
	mutate(method = 'French')
	field3 <- read_csv('~/Downloads/canopycover_ratiomask_field3.csv') %>%
	mutate(method = 'French')
	all_tr <- read_csv('~/Downloads/allcanopycover (1).csv') %>% select(-X1) %>%
	mutate(method = 'Li')

	---
	title: "Meta analysis plot organization"
	output: html_document
	---

	```{r setup, include=FALSE}
	knitr::opts_chunk$set(echo = TRUE)
	```

	## Lets look at what MA outputs look like

	# from https://pygame-zero.readthedocs.io/en/stable/introduction.html
	import pgzrun
	#import random

	WIDTH = 500
	HEIGHT = 1000

	alien = Actor('alien')
	alien.pos = WIDTH/2, HEIGHT/2