https://github.com/gk-crop/sunscanimport
https://github.com/gk-crop/sunscanimport
data shiny
Last synced: 8 months ago
JSON representation
- Host: GitHub
- URL: https://github.com/gk-crop/sunscanimport
- Owner: gk-crop
- Created: 2022-03-15T10:38:57.000Z (over 4 years ago)
- Default Branch: main
- Last Pushed: 2025-02-04T22:35:18.000Z (over 1 year ago)
- Last Synced: 2025-02-04T23:27:37.810Z (over 1 year ago)
- Topics: data, shiny
- Language: R
- Homepage:
- Size: 126 KB
- Stars: 0
- Watchers: 2
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
- Changelog: NEWS
Awesome Lists containing this project
README
[](https://gk-crop.r-universe.dev)
# sunscanimport 
Functions to import and organize LAI measurements from Sunscan device
## Installation
```
install.packages('sunscanimport',
repos = c(
'https://gk-crop.r-universe.dev',
'https://cloud.r-project.org'
)
)
```
## Run ShinyApp
```
sunscanimport::runSunscanApp()
```
## Converting a file
```
library(sunscanimport)
file <- "paulinenaue.TXT"
inputfolder <- "data/210908/original/"
outputfolder <- "data/210908/"
convfile <- convertSunscanFile(file,inputfolder, outputfolder)
generateReport(convfile, inputfolder, outputfolder)
```
## Converting a directory
Searches the directory recursively for Sunscan files and converts them.
```
library(sunscanimport)
convertSunScanDirectory("data/")
```
## Transforming converted data
### Create summary
```
library(sunscanimport)
data <- readr::read_delim("data/210908/converted/data_paulinenaue.txt", delim="\t")
data_summary <- createSummary(data)
```
### Transform to wide format
```
library(sunscanimport)
data <- readr::read_delim("data/210908/converted/data_paulinenaue.txt", delim="\t")
data_wide <- transformToWideFormat(data)
```
## Folder structure
Folder structure after conversion of sunscan file `name.TXT`. Optional files
added by user are marked with *.
```
folder
+ original
|-- name.TXT
|-- name.CFG *
|-- ReadMe.TXT *
+ proceeding
|-- plotid_name.TXT *
|-- measureid_name.TXT *
|-- grid_name.TXT *
+ converted
|-- data_name.TXT
|-- summary_name.TXT
|-- meta_name.TXT
+ report
|-- name.html *
```