updates

ncss-tech · Sep 26, 2024 · 7e87ea5 · 7e87ea5
1 parent f717131
commit 7e87ea5
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 9 deletions.
diff --git a/MIR/art-from-MIR-spectral-DB.R b/MIR/art-from-MIR-spectral-DB.R
@@ -43,11 +43,8 @@ base.path <- 'E:/MIR'
 # compressed spectra
 db.file <- file.path(base.path, 'MIR-compact-compressed.sqlite')
 
-# plain-text spectra
-# db.file <- file.path(base.path, 'MIR-compact-text.sqlite')
-
-# full
-# db.file <- file.path(base.path, 'MIR-compact.sqlite')
+# plain text
+db.file <- file.path(base.path, 'MIR-compact.sqlite')
 
 
 db <- dbConnect(RSQLite::SQLite(), db.file)
@@ -58,7 +55,10 @@ dbListFields(db, 'mir_metadata')
 dbListFields(db, 'mir_wn_sequence')
 
 
-dbGetQuery(db, "SELECT * from mir_wn_sequence;")
+# dbGetQuery(db, "SELECT * from mir_wn_sequence;")
+dbGetQuery(db, "SELECT COUNT(*) from mir_spec;")
+
+
 
 ## TODO: this should be defined in the DB
 # define / get from DB

diff --git a/MIR/eval-errors.R b/MIR/eval-errors.R
@@ -12,3 +12,4 @@ x <- x[idx]
 ## 2024-02-14 errors:
 ## C2019USNJ085
 
+z <- read_opus('E:/MIR/MIR_Library/C2019USNJ085/291505XS01.0', data_only = TRUE)
diff --git a/manual/KSSL-snapshot-tutorial.R b/manual/KSSL-snapshot-tutorial.R
@@ -2,14 +2,14 @@ library(DBI)
 library(RSQLite)
 
 # connect
-db <- dbConnect(RSQLite::SQLite(), 'E:/NASIS-KSSL-LDM/LDM/LDM-compact.sqlite')
+db <- dbConnect(RSQLite::SQLite(), 'E:/NASIS-KSSL-LDM/ncss_labdata.sqlite')
 
 # list tables
 dbListTables(db)
 
 # list fields
-dbListFields(db, 'nasis_ncss')
-dbListFields(db, 'physical')
+dbListFields(db, 'lab_combine_nasis_ncss')
+dbListFields(db, 'lab_physical_properties')
 
 
 # get data
Original file line number	Diff line number	Diff line change
Expand Up		@@ -12,3 +12,4 @@ x <- x[idx]
		## 2024-02-14 errors:
		## C2019USNJ085

		z <- read_opus('E:/MIR/MIR_Library/C2019USNJ085/291505XS01.0', data_only = TRUE)