Data Project

Code to calculate them. Takes a space seperated list of numbers to find mean, median, and mode of them.

#!/usr/bin/perl
use strict;
use warnings;


my $sum = 0;
my %counts;

foreach (@numbers) {
    $sum += $_;
    $counts{$_}++;
}

my $mean = $sum / @numbers;

print "Mean: ($sum / " . scalar(@numbers) . ") = $mean\n";
print "Median: ", median(\@numbers), "\n";
print "Mode: ", mode(\@numbers), "\n";

sub median {
    my $arr = shift;
    my @sorted = sort {$a <=> $b} @$arr;
    my $len = @sorted;
    return $len % 2 ? $sorted[$len/2] : ($sorted[$len/2 - 1] + $sorted[$len/2]) / 2;
}

sub mode {
    my $arr = shift;
    my %counts;
    foreach (@$arr) { $counts{$_}++ }
    my $max_count = 0;
    my $mode;
    foreach (keys %counts) {
        if ($counts{$_} > $max_count) {
            $max_count = $counts{$_};
            $mode = $_;
        }
    }
    return $mode;
}

1. A sample is a subset of a population. It represents the population. A population is the entire group you're analyzing. .Sample: Randomly selected group of 5 students. Population: Entire grade 8 class.
2. Primary data is data you collect yourself and secondary data is data that has already been collected and made available for researchers to use. Primary data collected through measuring independent variable. Secondary data(Made free throws) collected by Mr.Ray and used in project.
3. A census is when you ask the whole population. Sample, not census. Only \(5/14\) students were selected.
4. Discrete data for free throws and wingspan is continuous. Discrete data is countable.Continuous data is uncountable because of decimals in between.
5. A randomly selected sample was chosen, this helps minimize bias by giving every member of the population an equal chance of being selected.
6. The independent variable is the x axis and the dependent is the y axis. In this case the independent variable was the wingspan and the dependent variable was made free throws.