R
rm(list = ls(all.names = TRUE))
setwd("")
getwd()
.libPaths("")
.libPaths()
data <- read.csv("", header = T, fileEncoding = "UTF-8")使用するパッケージ（パッケージのインストール）
R
# グラフを2つ横に並べる設定
par(mfrow = c(1, 2)) # 1行2列のレイアウト
# prBlc == 0のときのdaysのヒストグラム
hist(data$days[data$prBlc == 0],
main = "prBlc = 0のときのdays",
xlab = "days",
col = "lightblue",
border = "black")
# prBlc == 1のときのdaysのヒストグラム
hist(data$days[data$prBlc == 1],
main = "prBlc = 1のときのdays",
xlab = "days",
col = "lightgreen",
border = "black")
# レイアウト設定を元に戻す
par(mfrow = c(1, 1))R
png("g3.png", width = 5.83, height = 5.82, units = "in", res = 400)
plot(g3) # ここにプロットを作成するコードを入れる
dev.off()データセット age01 をdatに格納します（ファイルの読み込み）
R
rm(list = ls(all.names = TRUE))
setwd("C:\\Users\\rehay\\Downloads")
getwd()R
rm(list = ls(all.names = TRUE))
setwd("")
getwd()
.libPaths("C:/Users/rehay/Documents/Rpackages")
library(languageserver)#vscodeで必要
dat <- read.csv(".csv", header=T, fileEncoding = "UTF-8")R
rm(list = ls(all.names = TRUE))
setwd("C:/Users/yyoshida/Downloads")
getwd()R
dat <- read.csv(".csv",header=T, fileEncoding = "Shift-JIS")
１）半角スペース程度なら「 」
２）全角スペース程度なら「 」
３）大きなスペースを確保したいなら「 」
#残っている全てのオブジェクト（ベクトル、リストなど）を削除
rm(list = ls(all.names = TRUE))
#作業するフォルダの場所を指定
setwd("C:\\Users\\yyoshida\\Desktop")
#作業する場所が指定できているか確認
getwd()
.libPaths("C:\\Users\\yyoshida\\Documents\\Rpackages")
dat <- read.csv(".csv",header=T, fileEncoding = "Shift-JIS")
write.csv(, file=".csv",fileEncoding="UTF-8")$P(X=k)={}_n C_kp_i^k(1-p_i)^{n-k}$
コメント欄 『間違い』や『分かりにくい部分』などのご意見もお寄せください