Skip to content

Instantly share code, notes, and snippets.

@pm2r

pm2r/rprog-quiz3.txt

Forked from kfeoktistoff/rprog-quiz3.txt
Created December 20, 2017 07:34
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save pm2r/48c8cb570d6341efa95a62415ae59bf8 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save pm2r/48c8cb570d6341efa95a62415ae59bf8 to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. @kfeoktistoff kfeoktistoff renamed this gist Jun 18, 2014. 1 changed file with 0 additions and 0 deletions.
    0 rprog-quiz2.txt → rprog-quiz3.txt
    View file
    File renamed without changes.
  2. @kfeoktistoff kfeoktistoff created this gist Jun 18, 2014.
    46 changes: 46 additions & 0 deletions rprog-quiz2.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,46 @@
    1
    Take a look at the 'iris' dataset that comes with R. The data can be loaded with the code:

    library(datasets)
    data(iris)

    A description of the dataset can be found by running

    ?iris

    There will be an object called 'iris' in your workspace. In this dataset, what is the mean of 'Sepal.Length' for the species virginica? (Please only enter the numeric result and nothing else.)

    > tapply(Sepal.Length, Species, mean)["virginica"]


    2
    Continuing with the 'iris' dataset from the previous Question, what R code returns a vector of the means of the variables 'Sepal.Length', 'Sepal.Width', 'Petal.Length', and 'Petal.Width'?
    > apply(iris[,1:4],2,mean)

    3
    Load the 'mtcars' dataset in R with the following code

    library(datasets)
    data(mtcars)

    There will be an object names 'mtcars' in your workspace. You can find some information about the dataset by running

    ?mtcars

    How can one calculate the average miles per gallon (mpg) by number of cylinders in the car (cyl)?

    >sapply(split(mtcars$mpg, mtcars$cyl), mean)

    4
    Continuing with the 'mtcars' dataset from the previous Question, what is the absolute difference between the average horsepower of 4-cylinder cars and the average horsepower of 8-cylinder cars?
    > abs(mean(mtcars$hp[mtcars$cyl==4])-mean(mtcars$hp[mtcars$cyl==8]))
    126.5779

    5
    If you run

    debug(ls)

    what happens when you next call the 'ls' function?

    Execution of 'ls' will suspend at the beginning of the function and you will be in the browser.