From 9ba2b8fa87de1f96e83d68682311241ba092d5c3 Mon Sep 17 00:00:00 2001
From: Asitav Sen <asitav.sen@lanubia.com>
Date: Mon, 27 Dec 2021 11:10:36 +0100
Subject: [PATCH] Initiated

---
 .Rproj.user/178A6739/sources/prop/A1AE5A83    |  6 +++
 .Rproj.user/178A6739/sources/prop/INDEX       |  1 +
 .../sources/session-99529da2/FE6BB309         | 26 +++++++++++
 .../session-99529da2/FE6BB309-contents        | 46 +++++++++++++++++++
 .../sources/session-99529da2/lock_file        |  0
 .../shared/notebooks/patch-chunk-names        |  0
 LoanRisk.Rproj                                | 13 ++++++
 app.R                                         | 46 +++++++++++++++++++
 8 files changed, 138 insertions(+)
 create mode 100644 .Rproj.user/178A6739/sources/prop/A1AE5A83
 create mode 100644 .Rproj.user/178A6739/sources/prop/INDEX
 create mode 100644 .Rproj.user/178A6739/sources/session-99529da2/FE6BB309
 create mode 100644 .Rproj.user/178A6739/sources/session-99529da2/FE6BB309-contents
 create mode 100644 .Rproj.user/178A6739/sources/session-99529da2/lock_file
 create mode 100644 .Rproj.user/shared/notebooks/patch-chunk-names
 create mode 100644 LoanRisk.Rproj
 create mode 100644 app.R

diff --git a/.Rproj.user/178A6739/sources/prop/A1AE5A83 b/.Rproj.user/178A6739/sources/prop/A1AE5A83
new file mode 100644
index 0000000..92f169c
--- /dev/null
+++ b/.Rproj.user/178A6739/sources/prop/A1AE5A83
@@ -0,0 +1,6 @@
+{
+    "source_window_id": "",
+    "Source": "Source",
+    "cursorPosition": "29,10",
+    "scrollLine": "4"
+}
\ No newline at end of file
diff --git a/.Rproj.user/178A6739/sources/prop/INDEX b/.Rproj.user/178A6739/sources/prop/INDEX
new file mode 100644
index 0000000..a6e1977
--- /dev/null
+++ b/.Rproj.user/178A6739/sources/prop/INDEX
@@ -0,0 +1 @@
+~%2FProjects%2FLoanRisk%2Fapp.R="A1AE5A83"
diff --git a/.Rproj.user/178A6739/sources/session-99529da2/FE6BB309 b/.Rproj.user/178A6739/sources/session-99529da2/FE6BB309
new file mode 100644
index 0000000..168a60e
--- /dev/null
+++ b/.Rproj.user/178A6739/sources/session-99529da2/FE6BB309
@@ -0,0 +1,26 @@
+{
+    "id": "FE6BB309",
+    "path": "~/Projects/LoanRisk/app.R",
+    "project_path": "app.R",
+    "type": "r_source",
+    "hash": "3883691992",
+    "contents": "",
+    "dirty": false,
+    "created": 1685718888828.0,
+    "source_on_save": false,
+    "relative_order": 1,
+    "properties": {
+        "source_window_id": "",
+        "Source": "Source",
+        "cursorPosition": "29,10",
+        "scrollLine": "4"
+    },
+    "folds": "",
+    "lastKnownWriteTime": 1686046542,
+    "encoding": "UTF-8",
+    "collab_server": "",
+    "source_window": "",
+    "last_content_update": 1686046542053,
+    "read_only": false,
+    "read_only_alternatives": []
+}
\ No newline at end of file
diff --git a/.Rproj.user/178A6739/sources/session-99529da2/FE6BB309-contents b/.Rproj.user/178A6739/sources/session-99529da2/FE6BB309-contents
new file mode 100644
index 0000000..4400ce1
--- /dev/null
+++ b/.Rproj.user/178A6739/sources/session-99529da2/FE6BB309-contents
@@ -0,0 +1,46 @@
+# Estimate exposure at risk and create report
+# Application developed by LaNubia
+
+library(shiny)
+library(dplyr)
+library(ggplot2)
+library(lubridate)
+library(survival)
+library(pec)
+library(DT)
+library(shinycssloaders)
+library(imfr)
+library(patchwork)
+library(tidyr)
+library(shinythemes)
+library(triangle)
+library(DiagrammeR)
+library(stringr)
+
+# Define UI for application that draws a histogram
+ui <- fluidPage(
+
+    # Application title
+    titlePanel("LoanRisk"),
+
+    # Sidebar with a slider input for number of bins 
+    sidebarLayout(
+        sidebarPanel(
+
+        ),
+
+        # Show a plot of the generated distribution
+        mainPanel(
+           
+        )
+    )
+)
+
+# Define server logic required to draw a histogram
+server <- function(input, output) {
+
+
+}
+
+# Run the application 
+shinyApp(ui = ui, server = server)
diff --git a/.Rproj.user/178A6739/sources/session-99529da2/lock_file b/.Rproj.user/178A6739/sources/session-99529da2/lock_file
new file mode 100644
index 0000000..e69de29
diff --git a/.Rproj.user/shared/notebooks/patch-chunk-names b/.Rproj.user/shared/notebooks/patch-chunk-names
new file mode 100644
index 0000000..e69de29
diff --git a/LoanRisk.Rproj b/LoanRisk.Rproj
new file mode 100644
index 0000000..8e3c2eb
--- /dev/null
+++ b/LoanRisk.Rproj
@@ -0,0 +1,13 @@
+Version: 1.0
+
+RestoreWorkspace: Default
+SaveWorkspace: Default
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+UseSpacesForTab: Yes
+NumSpacesForTab: 2
+Encoding: UTF-8
+
+RnwWeave: Sweave
+LaTeX: pdfLaTeX
diff --git a/app.R b/app.R
new file mode 100644
index 0000000..4400ce1
--- /dev/null
+++ b/app.R
@@ -0,0 +1,46 @@
+# Estimate exposure at risk and create report
+# Application developed by LaNubia
+
+library(shiny)
+library(dplyr)
+library(ggplot2)
+library(lubridate)
+library(survival)
+library(pec)
+library(DT)
+library(shinycssloaders)
+library(imfr)
+library(patchwork)
+library(tidyr)
+library(shinythemes)
+library(triangle)
+library(DiagrammeR)
+library(stringr)
+
+# Define UI for application that draws a histogram
+ui <- fluidPage(
+
+    # Application title
+    titlePanel("LoanRisk"),
+
+    # Sidebar with a slider input for number of bins 
+    sidebarLayout(
+        sidebarPanel(
+
+        ),
+
+        # Show a plot of the generated distribution
+        mainPanel(
+           
+        )
+    )
+)
+
+# Define server logic required to draw a histogram
+server <- function(input, output) {
+
+
+}
+
+# Run the application 
+shinyApp(ui = ui, server = server)