R Markdown Есебі

Мәтіндік блок, код блогы, формула

Бұл есепте біз сандардың орта мәнін есептейміз.

x <- c(1, 2, 3, 4, 5)
# Орта мәнді есептеу
mean_x <- mean(x)
mean_x

## [1] 3

Орта мән формуласы: \[ \bar{x} = \frac{\sum_{i=1}^{n} x_i}{n} \]

График енгізу

library(ggplot2)
df <- data.frame(x=x, y=x^2)
ggplot(df, aes(x=x, y=y)) +
  geom_line(color="red") +
  geom_point() +
  ggtitle("Example ggplot2 Line Plot")

Headers, маркерленген тізім, кесте

1. Headers Мысалы

1.1 Кіші тақырып

2. Маркерленген тізім

• Бірінші элемент
• Екінші элемент
• Үшінші элемент

3. Кесте Мысалы

Name	Age	Score
Асель	20	85
Ақжан	21	90

Код блогының параметрлері

Мысал 1: Әдепкі

# Қарапайым есептеу
x <- 1:5
print(mean(x))

## [1] 3

Мысал 2: eval = FALSE (Код орындалмайды)

# Бұл жолдар Knit кезінде орындалмайды
result <- 99 * 99 
print("Бұл мәтін шықпайды")

Мысал 3: echo = FALSE (Кодты жасыру)

## [1] "Қосындысы: 60"

Мысал 4: message = FALSE (Хабарламаларды жасыру)

# "Starting library" сияқты пакеттердің хабарламалары жасырылады.
library(dplyr) # Бұл әдетте хабарлама шығарады

Мысал 5: warning = FALSE (Ескертулерді жасыру)

# R-да теріс санның логарифмін алу ескерту шығарады
result_log <- log(-5)
print("Теріс санның логарифмі есептелді (Нәтижесі NaN). Ескерту жасырылған.")

## [1] "Теріс санның логарифмі есептелді (Нәтижесі NaN). Ескерту жасырылған."

print(result_log)

## [1] NaN

Мысал 6: Барлығын жасыру (eval=TRUE, бірақ көрінбейтін)

Гистограммалар

hist(
  iris$Sepal.Length, # Салынатын деректер
  main = "Sepal Length Гистограммасы", # Графиктің негізгі тақырыбы
  xlab = "Күлте ұзындығы (см)", # x-осінің атауы
  ylab = "Жиілік", # y-осінің атауы
  col = "lightblue", # Бағандардың түсі
  border = "black"
)

Қорапшалық Диаграмма (Boxplot)

boxplot(
  iris$Sepal.Length ~ iris$Species, # Түрлер бойынша Sepal.Length-ті салыстыру
  main = "Түрлер бойынша Күлте Ұзындығының Қорапшалық Диаграммасы",
  xlab = "Өсімдік түрі",
  ylab = "Күлте ұзындығы (см)",
  col = c("pink", "lightgreen", "lightcoral") # Қорапшалардың түстері
)

Тығыздық Графигі (Density Plot)

density_data <- density(iris$Sepal.Length) 
plot(
  density_data,
  main = "Күлте Ұзындығының Тығыздық Графигі",
  xlab = "Күлте ұзындығы (см)",
  ylab = "Тығыздық",
  col = "darkblue", # Сызықтың түсі
  lwd = 2 # Сызықтың қалыңдығы
)
polygon(density_data, col = rgb(0, 0.5, 1, 0.4))

Inline R код мысалы

Алдымен, R код блогында бір айнымалыны анықтайық:

Нәтижені Мәтінге Енгізу

Біз x айнымалысын құрдық, оның құрамында 5 элемент бар.

Осы деректер жиынының орташа мәні келесідей: 32.

Ал оның медианасы (ортаңғы мәні): 30.

Сондай-ақ, осы сандардың қосындысы 160-ке тең.