Как можно задать название диаграммы через переменную функции? (по идее,

Question

Как можно задать название диаграммы через переменную функции? (по идее,

репрекс не нужен, да?)

То есть:
Есть функция, которая отрисовывает графики в зависимости от внутренних условий.
Предположим, функция получила на вход "Кот", отрисовала по условию "Стандартный" график.
Как через main задать название диаграммы, чтобы было понятно, какое условие выполнилось с учетом входного параметра?

#programming #r #russian

0

22.11.2023

16 ответов

25 просмотров

Ilya Shutov

1. Цифры как цифры, в чем исходный вопрос был? https://www.wolframalpha.com/input?i=plot+normal+distribution+mean+%3D+0%2C+sd+%3D+0.01 2. Оставьте базовую графику, откройте https://ggplot2.tidyverse.org/index.html

0

5 месяцев назад

Артур Караев Автор вопроса

Nikita
S3?

S3 - про ООП?

0

5 месяцев назад

Артур Караев Автор вопроса

Ilya Shutov
1. Цифры как цифры, в чем исходный вопрос был? htt...

Вопрос был в том, из-за чего по у уходит далеко за 1

0

5 месяцев назад

Ilya Shutov

Артур Караев
Вопрос был в том, из-за чего по у уходит далеко за...

потому что интеграл = 1 у дельта функции вообще бесконечность получите

0

5 месяцев назад

Артур Караев Автор вопроса

Ilya Shutov
потому что интеграл = 1 у дельта функции вообще бе...

Принял. Спасибо

0

5 месяцев назад

Nikita

Артур Караев
S3 - про ООП?

Именно. animal <- function(class, data) { class(data) <- class return(data) } plot.cat <- function(obj, ...) { plot(obj$X, obj$Y, main = "Scatter Diagram for Cats", xlab = "X-axis", ylab = "Y-axis", ...) } plot.dog <- function(obj, ...) { barplot(obj$Value, names.arg = obj$Category, main = "Bar Plot for Dogs", xlab = "Category", ylab = "Value", ...) } plot_animal <- function(obj, ...) { class_name <- class(obj)[1] if (class_name %in% c("cat", "dog")) { method_name <- paste("plot", class_name, sep = ".") if (exists(method_name)) { do.call(method_name, list(obj, ...)) } else { cat("Error: Unsupported class '", class_name, "'.\n") } } else { cat("Error: Unsupported class in object.\n") } } cat_data <- animal("cat", data.frame(X = rnorm(10), Y = rnorm(10))) dog_data <- animal("dog", data.frame(Category = c("A", "B", "C"), Value = c(4, 7, 2))) other_data <- data.frame(Class_Label = "rabbit", X = rnorm(5), Y = rnorm(5)) plot_animal(cat_data) plot_animal(dog_data) plot_animal(other_data)

0

5 месяцев назад

Elena V

В ггплот можно название переменной пробросить просто в заголовок

0

5 месяцев назад

Ilya Shutov

Вдохновитесь ggplot-ом, продвиньтесь на 10 шагов вперед: https://t.me/naukaidannye/216

0

5 месяцев назад

Alexander S1r

Nikita
Именно. animal <- function(class, data) { clas...