Publications by Kyra Ligas

Document

19.03.2025

1. Cars2020 <- read.csv("~/Documents/R code for Stats/Cars2020.csv") str(Cars2020) ## 'data.frame': 110 obs. of 21 variables: ## $ Make : chr "Acura" "Acura" "Audi" "Audi" ... ## $ Model : chr "MDX" "RLX" "A3" "A4" ... ## $ Type : chr "SUV" "Sedan" "Sedan" "Sporty" ... ## $ LowPrice : num 44.4 54.9 33.3 37.4 54.9 ... ## $ Hi...

572 sym Python (4880 sym/31 pcs) 7 img

Document

25.02.2025

Part 1 movielength <- c(94,109,110,123,125,108,92,106,84,119,110,140) cat("Mean movies length (in min): \n", mean(movielength) , "minutes") ## Mean movies length (in min): ## 110 minutes paste0("The mean movie length is ", mean(movielength) , " minutes." ) ## [1] "The mean movie length is 110 minutes." Part 2 1 Recipes <- data.frame( Type = ...

118 sym

Statistical Computing Assignment 1

07.02.2025

Part 1 1-4+2-3+5-7+11 ## [1] 5 4/9*(96-31) ## [1] 28.88889 21000/(1-(1+0.035)^-36) ## [1] 29570.5 25000*(1+(0.043/12))^(12*25) ## [1] 73109.21 (-1/3)+log(24)+exp(3)*sqrt((3/5)+3*5^-2) ## [1] 19.88786 Part 2 Create and store a vector of values starting at 5 and ending at 73, with the values increasing in increments of 4. vector<- c(seq(from =...

5070 sym Python (2488 sym/67 pcs)

Document

20.11.2024

## ## Pearson's Chi-squared test with Yates' continuity correction ## ## data: hr$promotion_last_5years and hr$left ## X-squared = 56.262, df = 1, p-value = 6.344e-14 p-value interpretation: The p-value is very small, therefore the probability of these results being random is very small. chi-square test interpretation: There is a dependency be...

1309 sym

Document

13.11.2024

## ## Welch Two Sample t-test ## ## data: hr1$average_montly_hours by hr1$Employee_Status ## t = 7.5323, df = 4875.1, p-value = 5.907e-14 ## alternative hypothesis: true difference in means between group Left and group Stayed is not equal to 0 ## 95 percent confidence interval: ## 6.183384 10.534631 ## sample estimates: ## mean in group Lef...

1518 sym

Document

05.11.2024

## ## Pearson's product-moment correlation ## ## data: hr$satisfaction_level and hr$last_evaluation ## t = 12.933, df = 14997, p-value < 2.2e-16 ## alternative hypothesis: true correlation is not equal to 0 ## 95 percent confidence interval: ## 0.08916727 0.12082195 ## sample estimates: ## cor ## 0.1050212 p-value interpretation: The p...

1355 sym 4 img

Document

25.10.2024

Histogram: Distribution of Employee Satisfaction Create a histogram of the satisfaction_level variable. The title should reflect a key takeaway from the distribution. Most employees have a satisfaction level > .50 There is a bigger portion of employees between the .1 - .11 satisfaction level Box Plot: Last Evaluation Scores Create a box plot of t...

1974 sym

Document

18.10.2024

library(nycflights13) library(tidyverse) ## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ── ## ✔ dplyr 1.1.4 ✔ readr 2.1.5 ## ✔ forcats 1.0.0 ✔ stringr 1.5.1 ## ✔ ggplot2 3.5.1 ✔ tibble 3.2.1 ## ✔ lubridate 1.9.3 �...

498 sym R (3841 sym/11 pcs)

Document

08.10.2024

library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union # Dataset 1: Customers customers <- tibble( customer_id = c(1, 2, 3, 4, 5), name = c("Alice", "Bob", "Charlie", ...

4457 sym R (5231 sym/39 pcs)

Assignment 3

27.09.2024

1. rename(): (4 points) Rename the “Film” column to “movie_title” and “Year” to “release_year”. q1 <- movies %>% rename(movie_title = Film , release_year = Year) head(q1) ## # A tibble: 6 × 8 ## movie_title Genre `Lead Studio` `Audience score %` Profitability ## <chr> <chr> <chr> ...

1402 sym Python (6037 sym/14 pcs)