/
tblup_trace.Rmd
103 lines (77 loc) · 3.16 KB
/
tblup_trace.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
---
title: "TBLUP Trace plots"
output:
workflowr::wflow_html:
toc: true
latex_engine: "xelatex"
code_folding: "hide"
editor_options:
chunk_output_type: console
---
```{r 0-setup, include=FALSE, warning=FALSE}
#libraries
library(ggplot2)
library(viridis)
library(data.table)
#options
options(bitmapType = "cairo")
options(error = function() traceback(3))
#seed
set.seed(123)
#ggplot holder list
gg <- vector(mode='list', length=12)
```
```{r plotReadIn}
fileList <- list.files('plots/tblup_trace', full.names=T)
#dgrp-starve/plots/tblup_trace
# snake/data/bglr/plots/m/tblup_nbt/30000_10000_25.png
# snake/data/bglr/plots/m/tblup_nbt/30000_10000_50.png
# snake/data/bglr/plots/m/tblup_nbt/30000_5000_25.png
# snake/data/bglr/plots/m/tblup_nbt/30000_5000_50.png
# snake/data/bglr/plots/m/tblup_nbt/55000_10000_25.png
# snake/data/bglr/plots/m/tblup_nbt/55000_10000_50.png
# snake/data/bglr/plots/m/tblup_nbt/55000_5000_25.png
# snake/data/bglr/plots/m/tblup_nbt/55000_5000_50.png
# snake/data/bglr/plots/m/tblup_nbt/80000_10000_25.png
# snake/data/bglr/plots/m/tblup_nbt/80000_10000_50.png
# snake/data/bglr/plots/m/tblup_nbt/80000_5000_25.png
# snake/data/bglr/plots/m/tblup_nbt/80000_5000_50.png
#
# knitr::include_graphics("plots/tblup_trace/30000_10000_25.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/30000_10000_50.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/30000_5000_25.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/30000_5000_50.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/55000_10000_25.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/55000_10000_50.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/55000_5000_25.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/55000_5000_50.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/80000_10000_25.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/80000_10000_50.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/80000_5000_25.png", error = FALSE)
# knitr::include_graphics("plots/tblup_trace/80000_5000_50.png", error = FALSE)
#
# plots/tblup_trace/30000_10000_25.png
# plots/tblup_trace/30000_10000_50.png
# plots/tblup_trace/30000_5000_25.png
# plots/tblup_trace/30000_5000_50.png
# plots/tblup_trace/55000_10000_25.png
# plots/tblup_trace/55000_10000_50.png
# plots/tblup_trace/55000_5000_25.png
# plots/tblup_trace/55000_5000_50.png
# plots/tblup_trace/80000_10000_25.png
# plots/tblup_trace/80000_10000_50.png
# plots/tblup_trace/80000_5000_25.png
# plots/tblup_trace/80000_5000_50.png
```