summary_statistics_A <- function(matrix){

vec = sort(as.vector(matrix))

len = length(vec)

if(isSymmetric(matrix) && is.numeric(matrix)){

min = vec[1]

Continue reading

summary_statistics_A <- function(matrix){

vec = sort(as.vector(matrix))

len = length(vec)

if(isSymmetric(matrix) && is.numeric(matrix)){

min = vec[1]

Continue reading

**Introduction**

In this report we will discuss ‘The Improvement Project of Science Construction PLC’ case study. Science Construction PLC provides services for constructing freeways, bridges, tunnels and train lines architecture, project creation, infrastructure procurement, project finance and leasing. The Continue reading

**Introduction**

Behaviorism is a learning theory which considers that all behaviors are learnt as a result of some external stimulus. According to this theory, a learner always responds to this external stimulus which is either in the form of reinforcement or punishment (Staddon, 2017). Both positive and Continue reading

from turtle import *

import random

if __name__ == ‘__main__’:

number_coins = int(input(‘Enter a number of coins: ‘)) Continue reading

**Part1: Iron deficiency anemia**

**Background**

Anemia happens when the red blood cells (RBCs) produce a low level of haemoglobin. In your RBCs, haemoglobin is the protein responsible for bringing oxygen into the tissues. Continue reading

**Q 1 – ANSWER :**

int first, last;

first=1;

last=10;

for (i=first; i<last; i++)

{

} Continue reading

Based on Jonathan Wolff’s analysis of the ideas of Plato, Rousseau, and Mill in his (Wolff, 2016) Chapter 3, each thinker addressed some problems with democratic voting, understood as simple majority rule. (i) Explain what these problems are, and (ii) discuss whether you think that Fishkin’s ideas in (Simon, 2002:230-233) can help solve these problems. Continue reading

**Introduction**

The aim of this review is to define and provide a systematic overview of quantitative models in the pharmaceutical supply chain, a topic not studied exhaustively in previous healthcare logistics reviews mainly related to quantitative models in healthcare or hospital logistics studies. Continue reading

rm(list = ls())

options(warn = -1)

library(readxl)

## Reading the data from excel

Project_2_Data <- read_excel(“Stat 481 Project 2 Data.xls”)

str(Project_2_Data)

## Cleaning and attributing the dtaa

Project_2_Data$courses = as.factor(Project_2_Data$courses)

Project_2_Data$gender = as.factor(Project_2_Data$gender)

levels(Project_2_Data$gender) <- c(“Female”, “Male”)

levels(Project_2_Data$courses) <- c(“Algebra”, “Algebra&Geometry”, “Calculus”)

attach(Project_2_Data)

## Descriptives

library(ggplot2)

library(hrbrthemes)

library(dplyr)

library(tidyr)

library(viridis)

temp = aggregate(score~courses+gender, Project_2_Data, FUN = mean)

qqnorm(score)

ggplot(Project_2_Data, aes(x = score)) + geom_histogram()

summary(Project_2_Data)

p1 <- ggplot(data=Project_2_Data, aes(x=score, fill=courses)) + geom_density(adjust=1.5, alpha=.4) + theme_ipsum()

p2 <- ggplot(data=Project_2_Data, aes(x=score, fill=gender)) + geom_density(adjust=1.5, alpha=.4) + theme_ipsum()

## Model

## Test of normality and other assumptions

ks.test(score, pnorm, mean = mean(score), sd= sd(score))

bartlett.test(score~courses, data = Project_2_Data)

bartlett.test(score~gender, data = Project_2_Data)

## Linear model

model1 = anova(score ~ courses + gender, data = Project_2_Data)

model1

summary(model1)

## Post Hoc

library(DescTools)

PostHocTest(model1, method = “bonferroni”)

PostHocTest(model1, method = “hsd”)

#include <iostream>

#include <string>

using namespace std;

int main()

{

int numItem; Continue reading

**Introduction**

The aim of this review is to define and provide a systematic overview of quantitative models in the pharmaceutical supply chain, a topic not studied exhaustively in previous healthcare logistics reviews mainly related to quantitative models in healthcare or hospital logistics studies. Continue reading

**Introduction**

The article " Unpacking online learning understandings: Online learning self-efficacy and learning satisfaction" issued by four authors: Demei Shen, Moon-Heum Cho, Chia-Lin Tsai and Rose Marra was first accepted by Elsevier Inc for Released on April 8, 2013, and made available on April 15, 2013, for on-line access. Continue reading

creditDF <- read.csv(“Downloads/Credit.csv”)

str(creditDF)

# Q1)

# Exploratory Data Analysis Continue reading

— Query 1 —

SELECT

SUM(number) AS record_count

FROM

`bigquery-public-data.usa_names.usa_1910_2013` Continue reading