From 4c81046363f9f489748a7b7d44db361a6860ed73 Mon Sep 17 00:00:00 2001
From: marcelcosta <marcelcosta@mcosta.cat>
Date: Thu, 12 Jan 2023 14:33:51 +0100
Subject: [PATCH] =?UTF-8?q?Aplicaci=C3=B3n=20vac=C3=ADa.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Nitrogen/app.R | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 Nitrogen/app.R

diff --git a/Nitrogen/app.R b/Nitrogen/app.R
new file mode 100644
index 0000000..202b220
--- /dev/null
+++ b/Nitrogen/app.R
@@ -0,0 +1,28 @@
+library(shiny)
+
+ui <- fluidPage(
+
+    # Application title
+    titlePanel("Old Faithful Geyser Data"),
+
+    # Sidebar
+    sidebarLayout(
+        sidebarPanel(
+
+        ),
+
+        
+        mainPanel(
+           
+        )
+    )
+)
+
+server <- function(input, output) {
+
+    output$distPlot <- renderPlot({
+    })
+}
+
+# Run the application 
+shinyApp(ui = ui, server = server)