data-analysis

Heat pump water heater

Kazu Nozue / 2021-01-07
Thumbnail
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
Thumbnail
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
Thumbnail
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
Thumbnail
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
Thumbnail
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 = …