From 0a66848786d13398287d876aae655cc9ce400d83 Mon Sep 17 00:00:00 2001
From: Fonti Kar <f.kar@unsw.edu.au>
Date: Fri, 24 May 2024 16:20:23 +1000
Subject: [PATCH] Default to 100m radius

---
 R/ui.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/ui.R b/R/ui.R
index bd6497f..8e0fed1 100644
--- a/R/ui.R
+++ b/R/ui.R
@@ -144,7 +144,7 @@ ui <- function(){
               "10km" = 10000,
               "50km" = 50000
             ),
-            selected = 5000
+            selected = 100
           ),
           actionButton("executeButton", "Go")
         ),