Posts
2021-01-07
1 / 7
data-analysis
Heat pump water heater
Kazu Nozue
/
2021-01-07
library(tidyverse) library(lubridate) library(scales) Buring gas produce CO2. Reducing gas usage is critical to reduce CO2 production from our house. Here is the history of our gas usage of my house since 2012 November. # reading data gasdata <- …
data-analysis
Heart_rate_data_analysis1
Kazu Nozue
/
2021-01-01
library(XML) library(tidyverse) library(lubridate) library(scales) library(ggthemes) Reading downloaded health data from an Apple watch. path="/Volumes/data_personal/Kazu_blog/resources" #zip <- paste(path, 'export_Mana_101320.zip', sep = '/') zip <- paste(path, …
data-analysis
Useful R techniques 1
Kazu Nozue
/
2020-12-24
mtcars %>% rownames_to_column() %>% filter(str_detect(rowname,"Mazda")) ## rowname mpg cyl disp hp drat wt qsec vs am gear carb ## 1 Mazda RX4 21 6 160 110 3.9 2.620 16.46 0 1 4 4 ## 2 Mazda RX4 Wag 21 6 160 110 3.9 2.875 17.02 0 1 4 4 mtcars %>% rownames_to_column() %>% …
native-plant
Native_plant_project_v2_March_April_2020
Kazu Nozue
/
2020-04-18
March 21, 2020 […] This year Lupins and California poppies bloomed earlier than usual due to warm winter. During shelter-in place order many sidewalkers enjoyed our front yard. Some of them took pictures of plants, and others took California poppy plants and planted them to their front yards. …
native-plant
Native plant garden project v2.1
Kazu Nozue
/
2019-12-30
Toward this rainy season I started upgrading my native plant gardens. Main goals of this project (v2) are […] Fig.1 Survived lawn. […] Fig. 2. Replacing lawn to native plants. […] In the first project I expected spontanious disappearance of lawns from fronyard by no watering …
data-analysis
Evaluation of team rank prediction in sports league by sum of residuals
Kazu Nozue
/
2019-12-29
J1_2019_pred_results<-read_csv(file.path("2019-12-29-evaluation-of-team-rank-prediction-in-sports-league-by-sum-of-residuals_files","日刊スポーツ・サッカー担当の19年J1順位予想と結果.csv")) ## Parsed with column specification: ## cols( ## rank = col_double(), ## Hamamoto = col_character(), ## No = …
««
«
1
2
3
…
7
»
»»