mtcars Dashboard

Code

library(showtext)

Loading required package: sysfonts

Loading required package: showtextdb

Code

font_add_google("Noto Sans KR", "NotoSansKR")
showtext_auto()
library(ggplot2)

첫 번째 행: 요약 + 히스토그램 (60:40)

연비변수 요약 통계

Code

summary(mtcars$mpg)

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  10.40   15.43   19.20   20.09   22.80   33.90

연비(mpg) 히스토그램

Code

ggplot(mtcars, aes(x = mpg)) +
  geom_histogram(binwidth = 2, fill = "darkgreen", color = "white") +
  labs(title = "연비 분포", x = "Miles per Gallon") +
  theme_minimal() +
  theme(text = element_text(family = "NotoSansKR", size=20))

두 번째 행: 테이블 + 산점도 (50:50)

Code

head(mtcars)
ggplot(mtcars, aes(x = hp, y = mpg)) +
  geom_point(color = "steelblue", size = 2) +
  labs(
    title = "마력 vs 연비",
    x = "Horsepower (hp)",
    y = "Miles per Gallon (mpg)"
  ) +
  theme_minimal() +
  theme(text = element_text(family = "NotoSansKR", size=20))

데이터 테이블

                   mpg cyl disp  hp drat    wt  qsec vs am gear carb
Mazda RX4         21.0   6  160 110 3.90 2.620 16.46  0  1    4    4
Mazda RX4 Wag     21.0   6  160 110 3.90 2.875 17.02  0  1    4    4
Datsun 710        22.8   4  108  93 3.85 2.320 18.61  1  1    4    1
Hornet 4 Drive    21.4   6  258 110 3.08 3.215 19.44  1  0    3    1
Hornet Sportabout 18.7   8  360 175 3.15 3.440 17.02  0  0    3    2
Valiant           18.1   6  225 105 2.76 3.460 20.22  1  0    3    1

hp vs mpg 산점도