[Getting and Cleaning data] Project
2016-03-18 06:12
1801 查看
Project introduction
Project code
More details can be found here.
Review criteria
The submitted data set is tidy.
The Github repo contains the required scripts.
GitHub contains a code book that modifies and updates the available codebooks with the data to indicate all the variables and summaries calculated, along with units, and any other relevant information.
The README that explains the analysis files is clear and understandable.
The work submitted for this project is the work of the student who submitted it.
Getting and Cleaning Data Course Project
The purpose of this project is to demonstrate your ability to collect, work with, and clean a data set. The goal is to prepare tidy data that can be used for later analysis. You will be graded by your peers on a series of yes/no questions related to the project. You will be required to submit: 1) a tidy data set as described below, 2) a link to a Github repository with your script for performing the analysis, and 3) a code book that describes the variables, the data, and any transformations or work that you performed to clean up the data called CodeBook.md. You should also include a README.md in the repo with your scripts. This repo explains how all of the scripts work and how they are connected.
One of the most exciting areas in all of data science right now is wearable computing - see for example this article. Companies like Fitbit, Nike, and Jawbone Up are racing to develop the most advanced algorithms to attract new users. The data linked to from the course website represent data collected from the accelerometers from the Samsung Galaxy S smartphone. A full description is available at the site where the data was obtained:
http://archive.ics.uci.edu/ml/datasets/Human+Activity+Recognition+Using+Smartphones
Here are the data for the project:
https://d396qusza40orc.cloudfront.net/getdata%2Fprojectfiles%2FUCI%20HAR%20Dataset.zip
You should create one R script called run_analysis.R that does the following.
Merges the training and the test sets to create one data set.
Extracts only the measurements on the mean and standard deviation for each measurement.
Uses descriptive activity names to name the activities in the data set
Appropriately labels the data set with descriptive variable names.
From the data set in step 4, creates a second, independent tidy data set with the average of each variable for each activity and each subject.
Good luck!
Project code
More details can be found here.
Project introduction
The purpose of this project is to demonstrate your ability to collect, work with, and clean a data set.Review criteria
The submitted data set is tidy.
The Github repo contains the required scripts.
GitHub contains a code book that modifies and updates the available codebooks with the data to indicate all the variables and summaries calculated, along with units, and any other relevant information.
The README that explains the analysis files is clear and understandable.
The work submitted for this project is the work of the student who submitted it.
Getting and Cleaning Data Course Project
The purpose of this project is to demonstrate your ability to collect, work with, and clean a data set. The goal is to prepare tidy data that can be used for later analysis. You will be graded by your peers on a series of yes/no questions related to the project. You will be required to submit: 1) a tidy data set as described below, 2) a link to a Github repository with your script for performing the analysis, and 3) a code book that describes the variables, the data, and any transformations or work that you performed to clean up the data called CodeBook.md. You should also include a README.md in the repo with your scripts. This repo explains how all of the scripts work and how they are connected.
One of the most exciting areas in all of data science right now is wearable computing - see for example this article. Companies like Fitbit, Nike, and Jawbone Up are racing to develop the most advanced algorithms to attract new users. The data linked to from the course website represent data collected from the accelerometers from the Samsung Galaxy S smartphone. A full description is available at the site where the data was obtained:
http://archive.ics.uci.edu/ml/datasets/Human+Activity+Recognition+Using+Smartphones
Here are the data for the project:
https://d396qusza40orc.cloudfront.net/getdata%2Fprojectfiles%2FUCI%20HAR%20Dataset.zip
You should create one R script called run_analysis.R that does the following.
Merges the training and the test sets to create one data set.
Extracts only the measurements on the mean and standard deviation for each measurement.
Uses descriptive activity names to name the activities in the data set
Appropriately labels the data set with descriptive variable names.
From the data set in step 4, creates a second, independent tidy data set with the average of each variable for each activity and each subject.
Good luck!
Project code.
setwd("E:/coursera/note") #------------------------------------------------------------------------------- # 1. Merge the training and the test sets to create one data set. ## step 1: download zip file from website if(!file.exists("./data")) dir.create("./data") fileUrl <- "https://d396qusza40orc.cloudfront.net/getdata%2Fprojectfiles%2FUCI%20HAR%20Dataset.zip" download.file(fileUrl, destfile = "./data/projectData_getCleanData.zip") ## step 2: unzip data listZip <- unzip("./data/projectData_getCleanData.zip", exdir = "./data") ## step 3: load data into R train.x <- read.table("./data/UCI HAR Dataset/train/X_train.txt") train.y <- read.table("./data/UCI HAR Dataset/train/y_train.txt") train.subject <- read.table("./data/UCI HAR Dataset/train/subject_train.txt") test.x <- read.table("./data/UCI HAR Dataset/test/X_test.txt") test.y <- read.table("./data/UCI HAR Dataset/test/y_test.txt") test.subject <- read.table("./data/UCI HAR Dataset/test/subject_test.txt") ## step 4: merge train and test data trainData <- cbind(train.subject, train.y, train.x) testData <- cbind(test.subject, test.y, test.x) fullData <- rbind(trainData, testData) #------------------------------------------------------------------------------- # 2. Extract only the measurements on the mean and standard deviation for each measurement. ## step 1: load feature name into R featureName <- read.table("./data/UCI HAR Dataset/features.txt", stringsAsFactors = FALSE)[,2] ## step 2: extract mean and standard deviation of each measurements featureIndex <- grep(("mean\\(\\)|std\\(\\)"), featureName) finalData <- fullData[, c(1, 2, featureIndex+2)] colnames(finalData) <- c("subject", "activity", featureName[featureIndex]) #------------------------------------------------------------------------------- # 3. Uses descriptive activity names to name the activities in the data set ## step 1: load activity data into R activityName <- read.table("./data/UCI HAR Dataset/activity_labels.txt") ## step 2: replace 1 to 6 with activity names finalData$activity <- factor(finalData$activity, levels = activityName[,1], labels = activityName[,2]) #------------------------------------------------------------------------------- # 4. Appropriately labels the data set with descriptive variable names. names(finalData) <- gsub("\\()", "", names(finalData)) names(finalData) <- gsub("^t", "time", names(finalData)) names(finalData) <- gsub("^f", "frequence", names(finalData)) names(finalData) <- gsub("-mean", "Mean", names(finalData)) names(finalData) <- gsub("-std", "Std", names(finalData)) #------------------------------------------------------------------------------- # 5. From the data set in step 4, creates a second, independent tidy data set with the average of each variable for each activity and each subject. library(dplyr) groupData <- final b35d Data %>% group_by(subject, activity) %>% summarise_each(funs(mean)) write.table(groupData, "./Getting_and_Cleaning_data_Project/MeanData.txt", row.names = FALSE)
相关文章推荐
- 1.明明的随机数(桶排序经典例题)
- 夺命雷公狗---DEDECMS----10dedecms双标签
- 最短路:我的理解--Dijkstra算法
- 很特别的一个动态规划入门教程
- 最短路径:我的理解--SPFA算法
- 双向广搜
- [git] Basic Git Command Line Reference for Windows Users
- bzoj 1951: [Sdoi2010]古代猪文
- 7. 最大公约数(辗转相除法)
- OSChina 周五乱弹 ——越污的人颜值越高 不信看图!
- GRYZ[寒假模拟赛]
- for循环的执行顺序
- [git] git Process
- bzoj 1934: [Shoi2007]Vote 善意的投票
- bzoj 1927: [Sdoi2010]星际竞速
- bzoj 1926: [Sdoi2010]粟粟的书架
- 生活中如何说服别人
- bzoj 1923: [Sdoi2010]外星千足虫
- bzoj 1922: [Sdoi2010]大陆争霸
- bzoj 1911: [Apio2010]特别行动队