R语言的plotly怎么使用

这篇文章主要介绍“R语言的plotly怎么使用”的相关知识，小编通过实际案例向大家展示操作过程，操作方法简单快捷，实用性强，希望这篇“R语言的plotly怎么使用”文章能帮助大家解决问题。

plotly包：是一个基于浏览器的交互式图表库，建立在开源的JavaScript图表库plotly.js上，plotly包利用函数plot_ly函数绘制交互图。本文简单介绍几种常见图表的绘制方式，点图、线图及箱线图。

安装包准备

install.packages("plotly") ##安装方式
library(plotly) ##载入

一、点图

1）利用ColorBrewer Palette Names定义颜色,形状  大小
p <- plot_ly(data = iris, x = ~Sepal.Length, y = ~Petal.Length,
color = ~Species #颜色分类
,symbol = ~Species , symbols = c('circle','x','o')#符号分类及对应的表示符号
, colors = "Set1" #颜色选用Set1颜色集的颜色
,mode = 'markers',marker = list(size = 10)) #mode 点图；marker的大小

2）自定义颜色以及与分类相对应的颜色
pal <- c("red", "blue", "green") #定义颜色
pal <- setNames(pal, c("virginica", "setosa", "versicolor")) #定义对应的分类

p <- plot_ly(data = iris, x = ~Sepal.Length, y = ~Petal.Length, color = ~Species, colors = pal)

3）添加"悬浮"注释信息###
d <- diamonds[sample(nrow(diamonds), 1000), ]
p <- plot_ly(
  d, x = ~carat, y = ~price,
  # Hover text: 悬浮信息
  text = ~paste("Price: ", price, '$<br>Cut:', cut),
  color = ~carat, size = ~carat) ##渐变颜色

二、线图 

1）自定义数据集

month <- c('January', 'February', 'March', 'April', 'May', 'June', 'July',
         'August', 'September', 'October', 'November', 'December')

high_2007 <- c(36.5, 26.6, 43.6, 52.3, 71.5, 81.4, 80.5, 82.2, 76.0, 67.3, 46.1, 35.0)
low_2007 <- c(23.6, 14.0, 27.0, 36.8, 47.6, 57.7, 58.9, 61.2, 53.3, 48.5, 31.0, 23.6)
high_2014 <- c(28.8, 28.5, 37.0, 56.8, 69.7, 79.7, 78.5, 77.8, 74.1, 62.6, 45.3, 39.9)
low_2014 <- c(12.7, 14.3, 18.6, 35.5, 49.9, 58.0, 60.0, 58.6, 51.7, 45.2, 32.2, 29.1)

data <- data.frame(month, high_2007, low_2007, high_2014, low_2014)

#将月份按照如下方式排序（默认是按照字母顺序排列，图形有问题）
data$month <- factor(data$month, levels = data[["month"]])

##add_trace 可添加新的图形
p <- plot_ly(data, x = ~month, y = ~high_2014, name = 'High 2014', type = 'scatter', mode = 'lines',line = list(color = 'purple', width = 4)) %>%
  add_trace(y = ~low_2014, name = 'Low 2014', line = list(color = 'rgb(22, 96, 167)', width = 4)) %>%
  add_trace(y = ~high_2007, name = 'High 2007', line = list(color = 'purple', width = 4, dash = 'dash')) %>%
  add_trace(y = ~low_2007, name = 'Low 2007', line = list(color = 'rgb(22, 96, 167)', width = 4, dash = 'dash')) %>%
  ##layout 设置标题相关信息
  layout(title = "Average High and Low Temperatures in New York",
         xaxis = list(title = "Months"),
         yaxis = list (title = "Temperature (degrees F)"))

2）综合点图和线图

trace_0 <- rnorm(100, mean = 5)
trace_1 <- rnorm(100, mean = 0)
trace_2 <- rnorm(100, mean = -5)
x <- c(1:100)

data <- data.frame(x, trace_0, trace_1, trace_2)

p <- plot_ly(data, x = ~x, y = ~trace_0, name = 'trace 0', type = 'scatter', mode = 'lines') %>%
  add_trace(y = ~trace_1, name = 'trace 1', mode = 'lines+markers') %>%
  add_trace(y = ~trace_2, name = 'trace 2', mode = 'markers')
    
三、箱线图

1）分类箱线图
p <- plot_ly(ggplot2::diamonds, y = ~price, color = ~cut, type = "box")

###多组箱线图  layout
p <- plot_ly(ggplot2::diamonds, x = ~cut, y = ~price, color = ~clarity, type = "box") %>%
  layout(boxmode = "group")
 

关于“R语言的plotly怎么使用”的内容就介绍到这里了，感谢大家的阅读。如果想了解更多行业相关的知识，可以关注亿速云行业资讯频道，小编每天都会为大家更新不同的知识点。