AK

実験を作っては,分析しては追記をしていくノート。                   …

AK

実験を作っては,分析しては追記をしていくノート。                                          論文を読んでは追記をしていくノート:https://note.com/12qwaszx34erdfc

最近の記事

R | ggplot | theme_linedraw | 白に黒色の線がある背景にしたい

install.packages("tidyverse")library(ggplot2) df <- data.frame(   subject = c("x1", "x2", "x3", "x4", "x5", "x6"),   weight = c(45, 53, 56, 72, 65, 50)) head(df, 2) g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(s

    • R | ggplot | ggsave | グラフを保存したい

      install.packages("tidyverse") library(ggplot2)df <- data.frame(  subject = c("x1", "x2", "x3", "x4", "x5", "x6"),  weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight))+   geom_bar(stat = "identity")plo

      • R | ggplot | theme_void | 背景をなくしたい

        install.packages("tidyverse") library(ggplot2)df <- data.frame(   subject = c("x1", "x2", "x3", "x4", "x5", "x6"),   weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(sta

        • R | ggplot | theme_minimal | 枠線なしの白に灰色の線がある背景にしたい

          install.packages("tidyverse")library(ggplot2) df <- data.frame(   subject = c("x1", "x2", "x3", "x4", "x5", "x6"),   weight = c(45, 53, 56, 72, 65, 50)) head(df, 2) g <- ggplot(df, aes(x = subject, y = weight))+   geom_bar(stat = "identity"

        R | ggplot | theme_linedraw | 白に黒色の線がある背景にしたい

        • R | ggplot | ggsave | グラフを保存したい

        • R | ggplot | theme_void | 背景をなくしたい

        • R | ggplot | theme_minimal | 枠線なしの白に灰色の線がある背景にしたい

          R | ggplot | theme_light | 白に灰色の線がある背景にしたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame(  subject = c("x1", "x2", "x3", "x4", "x5", "x6"),  weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(stat

          R | ggplot | theme_light | 白に灰色の線がある背景にしたい

          R | ggplot | theme_dark | 背景を黒色にしたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame(   subject = c("x1", "x2", "x3", "x4", "x5", "x6"),   weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(sta

          R | ggplot | theme_dark | 背景を黒色にしたい

          R | ggplot | coord_flip | y軸とx軸を入れ替えたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame( subject = c("x1", "x2", "x3", "x4", "x5", "x6"), weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight))+ geom_bar(stat = "identity")+ coord

          R | ggplot | coord_flip | y軸とx軸を入れ替えたい

          R | ggplot | theme_bw | 灰色と白色を逆の背景にしたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame(   subject = c("x1", "x2", "x3", "x4", "x5", "x6"),   weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight))+   geom_bar(stat = "identity")+

          R | ggplot | theme_bw | 灰色と白色を逆の背景にしたい

          R | ggplot | geom_histogram | ヒストグラフを描きたい

          install.packages("tidyverse")library(ggplot2)df <- data.frame( subject = c("x1", "x2", "x3", "x4", "x5","x6", "x7", "x8", "x9", "x10"), weight = c(45, 53, 56, 72, 65, 50, 67, 52, 78, 65), height = c(160, 170, 162, 175, 165, 160, 167, 167, 1

          R | ggplot | geom_histogram | ヒストグラフを描きたい

          R | ggplot | geom_lineで折れ線グラフを描きたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame( subject = c("x1", "x2", "x3", "x4", "x5","x6"), weight = c(45, 53, 56, 72, 65, 50), height = c(160, 170, 180, 175, 165, 160))head(df, 2)g <- ggplot(df, aes(x = weight, y = heig

          R | ggplot | geom_lineで折れ線グラフを描きたい

          R | ggplot | geom_bar | バーの間隔を空けたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame( subject = c("x1", "x2", "x3", "x4", "x5", "x6"), weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+ geom_bar(stat = "i

          R | ggplot | geom_bar | バーの間隔を空けたい

          R | ggplot | scale_y_reverse | y軸を反転させたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame( subject = c("x1", "x2", "x3", "x4", "x5", "x6"), weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight))+ geom_bar(stat = "identity")+ scale

          R | ggplot | scale_y_reverse | y軸を反転させたい

          R | ggplot | geom_bar |数値を表示したい

          install.packages("tidyverse") library(ggplot2)df <- data.frame(  subject = c("x1", "x2", "x3", "x4", "x5", "x6"),  weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(stat

          R | ggplot | geom_bar |数値を表示したい

          R | ggplot | geom_bar |バーの色を変えたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame(  subject = c("x1", "x2", "x3", "x4", "x5", "x6"),  weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(stat

          R | ggplot | geom_bar |バーの色を変えたい

          R | ggplot | geom_bar |数値を表示したい

          install.packages("tidyverse") library(ggplot2)df <- data.frame(  subject = c("x1", "x2", "x3", "x4", "x5", "x6"),  weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight, fill = subject))+   geom_bar(stat

          R | ggplot | geom_bar |数値を表示したい

          R | ggplot | scale_x_discrete |x軸(離散値)を並び替えたい

          install.packages("tidyverse") library(ggplot2)df <- data.frame( subject = c("x1", "x2", "x3", "x4", "x5", "x6"), weight = c(45, 53, 56, 72, 65, 50))head(df, 2)g <- ggplot(df, aes(x = subject, y = weight))+  geom_bar(stat = "identity")+ scal

          R | ggplot | scale_x_discrete |x軸(離散値)を並び替えたい