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.