AK

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

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

AK

    • 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

      AK

      • 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

        AK

        • 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"

          AK

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

          AK

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

          AK

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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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")+

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK

          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

          AK

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

          AK