График
library(ggplot2)
library(plotly)
##
## Присоединяю пакет: 'plotly'
## Следующий объект скрыт от 'package:ggplot2':
##
## last_plot
## Следующий объект скрыт от 'package:stats':
##
## filter
## Следующий объект скрыт от 'package:graphics':
##
## layout
library(readxl)
df <- read_excel ("Зависимость.xlsx",
col_names = TRUE)
p <- ggplot(df, aes(`Температура`,`Абсолютная влажность` )) +
geom_line(color = "orange") +
geom_point(color = "pink")
plotly::ggplotly(p)
Табличка
library(formattable)
##
## Присоединяю пакет: 'formattable'
## Следующий объект скрыт от 'package:plotly':
##
## style
library(readxl)
library(ggplot2)
df1 <- read_excel("Зависимость.xlsx")
formattable(df1)
|
Абсолютная влажность
|
Температура
|
|
50
|
24.9
|
|
45
|
19.6
|
|
40
|
15.3
|
|
35
|
11.9
|
|
30
|
9.1
|
|
25
|
6.9
|
|
20
|
5.2
|
|
15
|
1.0
|