Как поставить бесконечность и -бесконечность на графике с помощью графика
В прикрепленном изображении я хочу заменить -1 на -Inf и 3 на Inf.
Это код:
F <- function(x) {
f <- NULL
f[x < 0] <- 0
f[x >= 0 & x < 1] <- 0.4*x[x >= 0 & x < 1]^2
f[x >= 1 & x < 2] <- 0.2*x[x >= 1 & x < 2]^2 + (0.2)
f[x >= 2] <- 1
f
}
x <- seq(-1, 3, 0.01)
plot(x, F(x), type = "l", las=1)
Стоит ли изучать PHP в 2023-2024 годах?
Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.
Приемы CSS-макетирования - floats и Flexbox
Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...
Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest
В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...
Концепция локализации и ее применение в приложениях React ⚡️
Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...
Пользовательский скаляр GraphQL
Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...
1
0
78
1
Перейти к ответу
Данный вопрос помечен как решенный
Ответы 1
Ответ принят как подходящий
Используйте xaxt='n', чтобы опустить ось X. axTicks(1) показывает текущие тиковые позиции; вы можете заменить первый и последний элемент и заменить их собственными вещами.
plot(x, F(x), type = "l", las=1, xaxt='n')
at1 <- axTicks(1)
at1[c(1, length(at1))] <- c('-Inf', 'Inf')
axis(1, at=axTicks(1), labels=at1)
Вы также можете использовать символы, используя expression.
plot(x, F(x), type = "l", las=1, xaxt='n')
at1 <- axTicks(1)
at1[c(1, length(at1))] <- expression(-infinity, infinity)
axis(1, at=axTicks(1), labels=at1)
Другие вопросы по теме
Gnuplot: установить соотношение сторон осей X и Y на трехмерном графике
MATLAB Построение решения дифференциального уравнения второго порядка Ошибка
Невозможно отобразить функцию графика Statsforecast внутри цикла
Как фильтровать текстовый знак Observable Plot, когда «раздел» слишком узкий
Почему мой geom_smooth не плоский, как должно быть?
Получить значения данных наблюдаемого графика x, y из положения мыши (наведение курсора мыши)
Нужно, чтобы слово «Дельта» было написано в названии графика R, но продолжало конвертироваться в символ «дельта»
Что это за сюжет называется? И как мне построить график с помощью matplotlib?
Как построить строки, содержащие na, в сложенной гистограмме Python?
Как реорганизовать данные для правильного построения линейного графика в Python
Похожие вопросы
Понимание того, почему grepl неправильно определяет слова
Как проверить, содержит ли таблица data.table столбец, а если нет, создать его и заполнить значением NA?
Невозможно создать формулу массива с помощью функции writeFormula пакета openxlsx
Соберите таблицу лидеров хоум-рана из Baseball Savant с помощью R
Небольшой хак для ggplot — простой способ добавить текст с реальными средними значениями и стандартным отклонением при использовании линий или столбцов
Перечислите все месяцы между двумя датами в R
Пользовательский стиль Mapbox не отображается
Ggraph: настройка положения текстовой метки на круговой дендрограмме
Вычислите бета-функцию с отрицательными аргументами
Многомерное масштабирование: Ошибка: достигнут предел векторной памяти 16,0 Гб