From d6be41f46726d268e25148732fbfd1ca06c6f66e Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:21:39 +0530 Subject: [PATCH 1/8] Create remove-all-white-space.r --- archive/r/r/remove-all-white-space.r | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 archive/r/r/remove-all-white-space.r diff --git a/archive/r/r/remove-all-white-space.r b/archive/r/r/remove-all-white-space.r new file mode 100644 index 000000000..78a2258a6 --- /dev/null +++ b/archive/r/r/remove-all-white-space.r @@ -0,0 +1,27 @@ +# Remove all white space +args <- commandArgs(trailingOnly = TRUE) + +if (length(args) == 0 || args[1] = "" || is.null(args[1]) ){ + cat("Error: Please provide a positive integer.") +} + +n <- as.numeric(args[1) + +if(is.na(n) || n < 1){ + cat("Error: Please provide a positive integer.") + q(status=1) +} else if (n == 0){ + q(status = 1) +} else { + num1 = 0 + num2 = 1 + num3 = 0 + i = 1 + while (i <= n) { + num3 = num1 + num2 + num1 = num2 + num2 = num3 + cat(i, ":", num1,"\n") + i = i +1 + } +} From 447c47baa8cd6e038d44dcbc483873f9724fdab4 Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:29:52 +0530 Subject: [PATCH 2/8] Rename remove-all-white-space.r to remove-all-white-space.R --- .../r/r/{remove-all-white-space.r => remove-all-white-space.R} | 0 1 file changed, 0 insertions(+), 0 deletions(-) rename archive/r/r/{remove-all-white-space.r => remove-all-white-space.R} (100%) diff --git a/archive/r/r/remove-all-white-space.r b/archive/r/r/remove-all-white-space.R similarity index 100% rename from archive/r/r/remove-all-white-space.r rename to archive/r/r/remove-all-white-space.R From 4f9ae7e2074ea7fe30313871bea5ab1d19b98d97 Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:31:15 +0530 Subject: [PATCH 3/8] Update remove-all-white-space.R file extension fixed from .r to .R --- archive/r/r/remove-all-white-space.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/archive/r/r/remove-all-white-space.R b/archive/r/r/remove-all-white-space.R index 78a2258a6..2ca7ab025 100644 --- a/archive/r/r/remove-all-white-space.R +++ b/archive/r/r/remove-all-white-space.R @@ -1,4 +1,4 @@ -# Remove all white space +# Remove all white spaces args <- commandArgs(trailingOnly = TRUE) if (length(args) == 0 || args[1] = "" || is.null(args[1]) ){ From 838b73d06c5880ef5a3c17ebc613a21c06bb0619 Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:35:15 +0530 Subject: [PATCH 4/8] Update and rename remove-all-white-space.R to remove-all-whitespace.R typo and file name fixed --- .../r/r/{remove-all-white-space.R => remove-all-whitespace.R} | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) rename archive/r/r/{remove-all-white-space.R => remove-all-whitespace.R} (87%) diff --git a/archive/r/r/remove-all-white-space.R b/archive/r/r/remove-all-whitespace.R similarity index 87% rename from archive/r/r/remove-all-white-space.R rename to archive/r/r/remove-all-whitespace.R index 2ca7ab025..dabb470a8 100644 --- a/archive/r/r/remove-all-white-space.R +++ b/archive/r/r/remove-all-whitespace.R @@ -1,7 +1,7 @@ # Remove all white spaces args <- commandArgs(trailingOnly = TRUE) -if (length(args) == 0 || args[1] = "" || is.null(args[1]) ){ +if (length(args) == 0 || args[1] == "" || is.null(args[1]) ){ cat("Error: Please provide a positive integer.") } From b34783ef41ae3ae8b467eadcb6041dc29807ea2b Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:37:44 +0530 Subject: [PATCH 5/8] Update remove-all-whitespace.R Fixed numeric conversion of command line params --- archive/r/r/remove-all-whitespace.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/archive/r/r/remove-all-whitespace.R b/archive/r/r/remove-all-whitespace.R index dabb470a8..ac0760bba 100644 --- a/archive/r/r/remove-all-whitespace.R +++ b/archive/r/r/remove-all-whitespace.R @@ -5,7 +5,7 @@ if (length(args) == 0 || args[1] == "" || is.null(args[1]) ){ cat("Error: Please provide a positive integer.") } -n <- as.numeric(args[1) +n <- as.numeric(args[1)) if(is.na(n) || n < 1){ cat("Error: Please provide a positive integer.") From 3c001b198fe0c625a3387a0833ff74b8da084b98 Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:38:30 +0530 Subject: [PATCH 6/8] Update remove-all-whitespace.R removed empty line at the end From 1c296eac81d9e632f7392d6b54fd0099b36831b2 Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:40:44 +0530 Subject: [PATCH 7/8] Update remove-all-whitespace.R fixed typo in line 8, cmd line param numeric conversion --- archive/r/r/remove-all-whitespace.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/archive/r/r/remove-all-whitespace.R b/archive/r/r/remove-all-whitespace.R index ac0760bba..b764e7102 100644 --- a/archive/r/r/remove-all-whitespace.R +++ b/archive/r/r/remove-all-whitespace.R @@ -5,7 +5,7 @@ if (length(args) == 0 || args[1] == "" || is.null(args[1]) ){ cat("Error: Please provide a positive integer.") } -n <- as.numeric(args[1)) +n <- as.numeric(args[1]) if(is.na(n) || n < 1){ cat("Error: Please provide a positive integer.") From 0017c9348297e5593888c7c3a670f0bffd5cce46 Mon Sep 17 00:00:00 2001 From: manasmithamn <73154097+manasmithamn@users.noreply.github.com> Date: Sun, 19 Oct 2025 10:47:05 +0530 Subject: [PATCH 8/8] Update remove-all-whitespace.R fixed the program, I was either dozing or hallucinating .. I was typing fibonacci check code under remove all white space, need to get good sleep after 6 commits --- archive/r/r/remove-all-whitespace.R | 23 +++-------------------- 1 file changed, 3 insertions(+), 20 deletions(-) diff --git a/archive/r/r/remove-all-whitespace.R b/archive/r/r/remove-all-whitespace.R index b764e7102..df0e7841a 100644 --- a/archive/r/r/remove-all-whitespace.R +++ b/archive/r/r/remove-all-whitespace.R @@ -2,26 +2,9 @@ args <- commandArgs(trailingOnly = TRUE) if (length(args) == 0 || args[1] == "" || is.null(args[1]) ){ - cat("Error: Please provide a positive integer.") + cat("Usage: please provide a string") } -n <- as.numeric(args[1]) +cleaned_sentence <- gsub("\\s+", "", args[1]) -if(is.na(n) || n < 1){ - cat("Error: Please provide a positive integer.") - q(status=1) -} else if (n == 0){ - q(status = 1) -} else { - num1 = 0 - num2 = 1 - num3 = 0 - i = 1 - while (i <= n) { - num3 = num1 + num2 - num1 = num2 - num2 = num3 - cat(i, ":", num1,"\n") - i = i +1 - } -} +cat (cleaned_sentence)