diff --git a/NEWS.md b/NEWS.md
index 2d7ebaf8..78082b73 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -13,6 +13,10 @@
 - Improves SQL injection safeguards via `glue::glue_sql` to generated SQL queries (#34).
 - Show proper error message when no telemetry data is available (#177).
 
+### Bug Fixes
+
+- Fixed Analytics app not being able to access data by Instrumentation app (#164).
+
 # shiny.telemetry 0.2.0
 
 ### New Features
diff --git a/inst/examples/app/analytics/app.R b/inst/examples/app/analytics/app.R
index aca2a5b8..19fead98 100644
--- a/inst/examples/app/analytics/app.R
+++ b/inst/examples/app/analytics/app.R
@@ -17,8 +17,11 @@ library(DT)
 library(shiny.telemetry)
 
 # Default storage backend using LogFile
+log_file_path <- file.path("..", "instrumentation", "user_stats.txt")
+if (!dir.exists(dirname(log_file_path))) log_file_path <- "user_stats.txt"
+
 data_storage <- DataStorageLogFile$new(
-  log_file_path = file.path(getwd(), "user_stats.txt")
+  log_file_path = log_file_path
 )
 
 # This sample application includes a configuration for RSConnect deployments,