Import and Export DataSet

DataSet: https://drive.google.com/drive/folders/1VZ-p-_OjaMVDgMwSncwKkpFKK9Q7XiPR?usp=share_link

Code

 #import Data Table from txt

mydata <- read.table('data.txt')

mydata

mydata <- read.table('data.txt',header=TRUE)

mydata

mydata <- read.table('dataspace.txt',header=TRUE)

mydata

mydata <- read.table('datadollar.txt',header=TRUE)

mydata

mydata <- read.table('datadollar.txt',header=TRUE,sep='$')

mydata

mydata <- read.table('data.txt',header=TRUE,nrows=5)

mydata

mydata <- read.table('data.txt',header=TRUE,skip=3)

mydata

mydata <- read.table('data.txt',nrows=5)

mydata

class(mydata)

#import from csv file

mydatacsv <- read.csv('data.csv')

mydatacsv

#import from rds file

mydata <- readRDS('chicago.rds')

mydata

#import from internet

url.show('http://assets.datacamp.com/course/compfin/sbuxPrices.csv')

mydata <- read.table('http://assets.datacamp.com/course/compfin/sbuxPrices.csv',sep=',',head=T)

mydata

#import from clipboard 

mydata <- read.table("clipboard", sep="\t", head=TRUE)

mydata

#Export csv

id = c(101,102,103)

name = c('John','Jonny','Jack')

marks = c(78.25,59.45,63.85)

students = data.frame(id,name,marks)

students

write.csv(students,file = 'dataoutput.csv')

write.csv(students,file='output.csv')