Update graph_algorithms/floyd_warshall.r

iampratik13 · Copilot · web-flow · commit 941c3dedb506 · 2025-10-12T18:30:53.000+05:30
Co-authored-by: Copilot &lt;175728472+Copilot@users.noreply.github.com&gt;
diff --git a/graph_algorithms/floyd_warshall.r b/graph_algorithms/floyd_warshall.r
@@ -279,7 +279,7 @@ demonstrate_floyd_warshall <- function() {
   cat("\n=== Demo Complete ===\n")
 }
 
-# Run demonstration if not in interactive mode
-if (!interactive()) {
+# Run demonstration only if explicitly requested via environment variable
+if (identical(Sys.getenv("RUN_FLOYD_WARSHALL_DEMO"), "true")) {
   demonstrate_floyd_warshall()
 }

Original file line number	Diff line number	Diff line change
`@@ -279,7 +279,7 @@ demonstrate_floyd_warshall <- function() {`
`279`	`279`	`cat("\n=== Demo Complete ===\n")`
`280`	`280`	`}`
`281`	`281`
`282`		`-# Run demonstration if not in interactive mode`
`283`		`-if (!interactive()) {`
	`282`	`+# Run demonstration only if explicitly requested via environment variable`
	`283`	`+if (identical(Sys.getenv("RUN_FLOYD_WARSHALL_DEMO"), "true")) {`
`284`	`284`	`demonstrate_floyd_warshall()`
`285`	`285`	`}`