---
# System prepended metadata

title: Rstudio 繪圖裝置修改-加速倍繪圖速度
tags: [可視化, R]

---

---
disqus: ahb0222
GA : G-VF9ZT413CG
---
# Rstudio 繪圖裝置修改-加速倍繪圖速度
> [color=#40f1ef][name=LHB阿好伯, 2021/07/16][:earth_africa:](https://www.facebook.com/LHB0222/)
###### tags: `R` `可視化`

[TOC]

![](https://i.imgur.com/IIsVmay.png)




# 十萬點散布圖
```r=
df <- data.frame(x1 = sample(100000), y1 = sample(100000),z1 = sample(c(1:3),10000,replace = T))
df
profvis({
  plot( x = df$x1, y = df$y1, type = "p")
})
```
## 預設
![](https://i.imgur.com/bzwzQqp.png)
![](https://i.imgur.com/TVfRbGk.png)

## AGG
![](https://i.imgur.com/ZoL7yRy.png)

![](https://i.imgur.com/dtVXu2M.png)
## Cairo
![](https://i.imgur.com/nrS0nTk.png)

![](https://i.imgur.com/LEaOl4y.png)


# 修改數據點外觀
```r=
df <- data.frame(x1 = sample(100000), y1 = sample(100000),z1 = sample(c(1:3),10000,replace = T))
df
profvis({
  plot( x = df$x1, y = df$y1, type = "p", pch = df$z1, col = df$z1)
})
```

## 預設

![](https://i.imgur.com/EZgIOAR.png)


![](https://i.imgur.com/FndMkO3.png)




## AGG
![](https://i.imgur.com/pZ0AmZ6.png)
![](https://i.imgur.com/LN3FTSq.png)




## Cairo
![](https://i.imgur.com/oQCeTNy.png)

![](https://i.imgur.com/zrczviK.png)

# 百萬散佈圖測試
## 預設
![](https://i.imgur.com/o9KyPGR.png)


## AGG
![](https://i.imgur.com/5D3yNwF.png)


## Cairo
![](https://i.imgur.com/TsI3Uqo.png)


# 千萬散佈圖測試

## 預設
![](https://i.imgur.com/7lsQXpm.png)

![](https://i.imgur.com/Fims8AJ.png)

![](https://i.imgur.com/MpTW4zF.png)

![](https://i.imgur.com/QaAd6FG.png)

## AGG
![](https://i.imgur.com/S5k3BWd.png)

![](https://i.imgur.com/EjLEsOq.png)


🌟全文可以至下方連結觀看或是補充


全文分享至

https://www.facebook.com/LHB0222/

https://www.instagram.com/ahb0222/

有疑問想討論的都歡迎於下方留言

喜歡的幫我分享給所有的朋友 \o/

有所錯誤歡迎指教

# [:page_with_curl: 全部文章列表](https://hackmd.io/@LHB-0222/AllWritings)



![](https://i.imgur.com/nHEcVmm.jpg)


