Publications by Marvanessa Dinorog

Item #1 Final Term Exam Stat 54

25.05.2023

library(graphics) library(ggplot2) Warning: package 'ggplot2' was built under R version 4.2.2 A researcher conducts a study to evaluate whether the distribution of the length of time it takes migraine patients to respond to a 100 mg. dose of an intravenously administered drug is normal, with a mean response time of 90 seconds and a standard de...

1061 sym R (1838 sym/21 pcs) 2 img

Item #1 Final Term Exam Stat 54

25.05.2023

library(graphics) library(ggplot2) Warning: package 'ggplot2' was built under R version 4.2.2 library(readxl) Kolmogorov <- read_excel("D:/MARV BS MATH/4th year, 2nd sem/Nonparametric Statistics/Kolmogorov.xlsx") Kolmogorov # A tibble: 30 × 2 Patient Scores <dbl> <dbl> 1 1 21 2 2 32 3 3 38 4 ...

393 sym R (1223 sym/15 pcs) 2 img

Additional Activity for Factor Analysis

24.05.2023

DATA places <- read.table("D:/MARV BS MATH/4th year, 2nd sem/Multivariate/places.txt", header=FALSE, sep = '') paged_table(places) Describing the Data We look at the dataset before we run any analysis. a <- describe(places) paged_table(a) We use the dim function to retrieve the dimension of the dataset. dim(places) [1] 329 10 Cleaning Data I...

1186 sym Python (4705 sym/25 pcs) 4 img

Canonical Correlation Analysis

24.05.2023

library(ggplot2) library(GGally) Registered S3 method overwritten by 'GGally': method from +.gg ggplot2 library(CCA) Loading required package: fda Loading required package: splines Loading required package: fds Loading required package: rainbow Loading required package: MASS Loading required package: pcaPP Loading required package: RCur...

6845 sym R (7253 sym/51 pcs) 3 img

Multivariate Analysis of Variance (MANOVA)

24.05.2023

MANOVA in R: Implementation As with most of the things in R, performing a MANOVA statistical test boils down to a single function call. But we’ll need a dataset first. The Iris dataset is well-known among the data science crowd, and it is built into R: paged_table(head(iris)) It doesn’t matter if you use the same dataset as us, as long as o...

4044 sym Python (2504 sym/11 pcs) 2 img

Discriminant Analysis

24.05.2023

Cluster Analysis in R Getting Data mydata <- read.csv("D:/MARV BS MATH/4th year, 2nd sem/Multivariate/Discriminant data.txt", header=T) str(mydata) 'data.frame': 22 obs. of 9 variables: $ Company : chr "Arizona " "Boston " "Central " "Commonwealth" ... $ Fixed_charge: num 1.06 0.89 1.43 1.02 1.49 1.32 1.22 1.1 1.34 1.12 ... $ RoR ...

3069 sym R (7227 sym/33 pcs) 13 img

Logistic Regression

24.05.2023

Logistic Regression Examples Example 1. Suppose that we are interested in the factors that influence whether a political candidate wins an election. The outcome (response) variable is binary (0/1); win or lose. The predictor variables of interest are the amount of money spent on the campaign, the amount of time spent campaigning negatively and ...

14103 sym Python (4377 sym/39 pcs) 1 img

Friedman Test

24.05.2023

Friedman Test in R Data Preparation We’ll use the self esteem score dataset measured over three time points. The data is available in the datarium package. data("selfesteem", package = "datarium") paged_table(head(selfesteem, 3)) Gather columns t1, t2 and t3 into long format. Convert id and time variables into factor (or grouping) variables:...

2368 sym 2 img

Exploratory Factor Analysis in R

22.05.2023

Exploratory Factor Analysis in R Data Overview Fetching data from the server We first need to fetch sample data from the server. This is a raw data set, so each row row represents a person’s survery. # Dataset url <- "https://raw.githubusercontent.com/housecricket/data/main/efa/sample1.csv" data_survey <- read.csv(url, sep = ",") paged_table(...

1824 sym R (8092 sym/33 pcs) 4 img

JOLINA THESIS ANALYSIS

06.05.2023

Null Hypothesis: The true mean difference between S. aureus and S. marcescens with the given concentration is equal to zero. Alternative Hypothesis: The true mean difference between S. aureus and S. marcescens with the given concentration is not equal to zero. shapiro.test(PLANT$SAMean128) Shapiro-Wilk normality test data: PLANT$SAMean...

5155 sym