Pertama kali adalah membuat program di arduino

Program C di arduino

dari IDE Arduino kita bisa melihat monitor serial seperti namapk pada gambar

Monitor serial di arduino

Untuk kode di rstudio kita membutuhkan library sebagai berikut

library(magrittr)
library(stringr)
library(serial)
## 
## Attaching package: 'serial'
## The following object is masked from 'package:base':
## 
##     isOpen

Untuk memudahlan dan kecepatan program sebelumnya harus dibersihkan

rm(list = ls())         # clear environment
graphics.off()          # close all graphic windows
### establish a serial connection
con <- serialConnection(name = "get_temps",
                        port = "/ttyACM1",
                        mode = "115200,n,8,1",
                        buffering = "none",
                        newline = 1,
                        translation = "cr")
#close(con)
isOpen(con)
## [1] FALSE
open(con)
isOpen(con)
## [1] TRUE

Cara membaca data serial adalah sebagai berikut :

read.serialConnection(con) 
## [1] ""

Data serial harus diperbaiki dengan menghilangkan  dan n dengan cara

### grab data from serial port
datacom <- read.serialConnection(con) %>%
  str_replace_all("[^[:digit:]]+", " ") %>%
  str_split(" ", simplify = TRUE) %>%
  as.numeric()
datacom
## [1] NA

Data con yg sdh diperbaiki bisa ditampilkan dengan plot sebagai berikut

x = 1:length(datacom) plot(x,datacom,main=“Grafik kelebaban tanah”, ylab=“kelembaban”, type=“l”, col=“blue”)

Grafik kelembaban tanah.