refactor
This commit is contained in:
@@ -5,6 +5,7 @@
|
|||||||
library(readODS)
|
library(readODS)
|
||||||
library(tidyverse)
|
library(tidyverse)
|
||||||
library(dplyr)
|
library(dplyr)
|
||||||
|
library(leaflet)
|
||||||
|
|
||||||
##
|
##
|
||||||
# parse the input data
|
# parse the input data
|
||||||
@@ -13,6 +14,10 @@ library(dplyr)
|
|||||||
# read a data frame from the ods document
|
# read a data frame from the ods document
|
||||||
df <- read_ods("ironwood_data_cleaned.ods", sheet = 1)
|
df <- read_ods("ironwood_data_cleaned.ods", sheet = 1)
|
||||||
|
|
||||||
|
# Output the results
|
||||||
|
print(df)
|
||||||
|
|
||||||
|
|
||||||
##
|
##
|
||||||
# 1. asses the tree health
|
# 1. asses the tree health
|
||||||
# - create an overview of the populations health
|
# - create an overview of the populations health
|
||||||
@@ -60,10 +65,19 @@ if (p_value < 0.05) {
|
|||||||
print("The data is normally distributed (fail to reject the null hypothesis)")
|
print("The data is normally distributed (fail to reject the null hypothesis)")
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
##
|
||||||
|
# 3. try to fit health and location data in one plot
|
||||||
|
##
|
||||||
|
|
||||||
|
sites <- data.frame(
|
||||||
|
id = 1:20,
|
||||||
|
lat =
|
||||||
|
)
|
||||||
|
|
||||||
##
|
##
|
||||||
# ToDo Tasks:
|
# ToDo Tasks:
|
||||||
##
|
##
|
||||||
|
|
||||||
# 3. calculate the average DBH and try to correlate it with the health index
|
# 4. calculate the average DBH and try to correlate it with the health index
|
||||||
# 4. plot health indices of each site on a map and try to find patterns
|
# 5. plot health indices of each site on a map and try to find patterns
|
||||||
# 5. try to fit health and location data in one plot
|
|
||||||
Reference in New Issue
Block a user