Move project 1 data to separate folder, initialize projec 2
This commit is contained in:
parent
35c23bd352
commit
08f8fe4811
|
@ -6,7 +6,7 @@ library(ggplot2)
|
|||
library(RColorBrewer)
|
||||
|
||||
# zaladowanie danych
|
||||
german_credit_risk <- read.csv("german_credit_data.csv", header = TRUE)
|
||||
german_credit_risk <- read.csv("proj1/german_credit_data.csv", header = TRUE)
|
||||
|
||||
# sprawdzenie danych
|
||||
head(german_credit_risk)
|
File diff suppressed because it is too large
Load Diff
|
@ -0,0 +1,14 @@
|
|||
library(dplyr)
|
||||
library(highcharter)
|
||||
library(xts)
|
||||
|
||||
cov <- read.csv("proj2/owid-covid-data.csv", header = TRUE)
|
||||
|
||||
df <- data.frame(as.Date(cov$date), cov$location, cov$total_deaths)
|
||||
|
||||
cov_xts <- xts(df[-1], order.by = date)
|
||||
|
||||
highchart(type = "stock") %>%
|
||||
hc_add_series(df[df$location == "Poland",]$total_deaths, type = "line")
|
||||
|
||||
|
Loading…
Reference in New Issue