Untitled

R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

library(kableExtra)

## Warning: package 'kableExtra' was built under R version 4.3.3

scorecard_data <- data.frame(
  KPI = c("KPI 1", "KPI 2", "KPI 3"),
  Target = c(100, 200, 150),
  Actual = c(90, 180, 160)
)

scorecard_table <- kable(scorecard_data, format = "html") %>%
  kable_styling(bootstrap_options = c("striped", "hover", "condensed", "responsive"), full_width = FALSE) %>%
  add_header_above(c(" ", "Performance" = 2)) %>%
  row_spec(0, bold = TRUE) %>%
  row_spec(c(1:3), background = "#f2f2f2")


scorecard_table

	Performance
KPI	Target	Actual
KPI 1	100	90
KPI 2	200	180
KPI 3	150	160

library(ggplot2)

burndown_data <- data.frame(
  Day = 1:10,
  Work_Remaining = c(100, 90, 80, 70, 60, 50, 40, 30, 20, 10)
)

# Create the Burn Down Chart
burndown_chart <- ggplot(burndown_data, aes(x = Day, y = Work_Remaining)) +
  geom_line(color = "blue") +
  geom_point(color = "blue", size = 3) +
  theme_minimal() +
  labs(x = "Day", y = "Work Remaining") +
  ggtitle("Sprint Burndown Chart") +
  theme(plot.title = element_text(face = "bold", size = 16, hjust = 0.5),
        axis.title = element_text(face = "bold", size = 14))

print(burndown_chart)