From 51a6c090d16a50c4e0cdc1ba9c038314456f5040 Mon Sep 17 00:00:00 2001 From: Dipterix Wang <8163576+dipterix@users.noreply.github.com> Date: Fri, 24 Mar 2023 19:40:58 -0400 Subject: [PATCH 1/2] Update read_fs_transform.R Added `trimws` to remove whitespace around xfm matrix --- R/read_fs_transform.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/read_fs_transform.R b/R/read_fs_transform.R index 9cbe873..3c7d614 100644 --- a/R/read_fs_transform.R +++ b/R/read_fs_transform.R @@ -265,7 +265,7 @@ parse.transform.matrix.lines <- function(file_lines, ignore_line_suffix=";") { if(endsWith(file_line, ignore_line_suffix)) { file_line = substring(file_line, 1L, (nchar(file_line) - nchar(ignore_line_suffix))); } - matrix_row = as.double(strsplit(file_line, " ")[[1]]); + matrix_row = as.double(strsplit(trimws(file_line), " ")[[1]]); tm[line_idx, ] = matrix_row; line_idx = line_idx + 1L; } From 0c5148bed029a71c55938e037369f5e9858dd4f0 Mon Sep 17 00:00:00 2001 From: Dipterix Wang <8163576+dipterix@users.noreply.github.com> Date: Fri, 24 Mar 2023 19:45:39 -0400 Subject: [PATCH 2/2] Update read_fs_transform.R `file_line` might look like this: ` 0.0 -1.0 0.0 0.0 ; `: trim whitespace before removing `;` --- R/read_fs_transform.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/read_fs_transform.R b/R/read_fs_transform.R index 3c7d614..b77d566 100644 --- a/R/read_fs_transform.R +++ b/R/read_fs_transform.R @@ -262,6 +262,9 @@ parse.transform.matrix.lines <- function(file_lines, ignore_line_suffix=";") { line_idx = 1L; for(file_line in file_lines) { + + file_line <- trimws(file_line) + if(endsWith(file_line, ignore_line_suffix)) { file_line = substring(file_line, 1L, (nchar(file_line) - nchar(ignore_line_suffix))); }