data analysis

Promoter motif plot using BioVizSeq package

Kazu Nozue / 2025-09-02

#install.packages("BioVizSeq") library(BioVizSeq) #library(shinydashboard) #install.packages("shinycssloaders") # /var/folders/_w/7dj610fh8xn6h8001s7_5h3r0000gn/T//Rtmph1L7Mw/downloaded_packages…

data analysis

Useful R techniques 4: Pretty Heatmap

Kazu Nozue / 2024-08-03

example(pheatmap) ## ## phetmp> # Create test matrix ## phetmp> test = matrix(rnorm(200), 20, 10) ## ## phetmp> test[1:10, seq(1, 10, 2)] = test[1:10, seq(1, 10, 2)] + 3 ## ## phetmp> test[11:20, seq(2, 10, 2)] = test[11:20, seq(2, 10, 2)] + 2 ## ## phetmp> test[15:20, seq(2, 10, 2)]…

data analysis

Useful R techniques 3: row-wise and col-wise sum

Kazu Nozue / 2021-11-04

df <- tibble(x = 1:2, y = 3:4, z = 5:6) df2 <- rbind(df, colSums(df));df2 # col-wise ## # A tibble: 3 × 3 ## x y z ## <dbl> <dbl> <dbl> ## 1 1 3 5 ## 2 2 4 6 ## 3 3 7 11 df3 <- cbind(df,rowSums(df));df3 # row-wise ## x y z rowSums(df) ## 1 1 3 5 9 ## 2 2 4 6 12 Row-wise…

data analysis

Useful R techniques 2

Kazu Nozue / 2021-03-19

Key words are key, value, inner_join(), left_join(), right_join(), full_join, semi_join(), and anti_join(). Read a book written by Hadley Wickham and Garrett Grolemund.

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 analysis 1

Kazu Nozue / 2021-01-01

An Apple watch measures heart rate and you can download its raw data. Here I plotted my daughter’s data in this year. Please see Taras Kaduk’s blog ( https://taraskaduk.com/2019/03/23/apple-health/) for details. library(XML) library(tidyverse) library(lubridate) library(scales) library(ggthemes)…