racter(11)1将字符串hello

start1,stop5)1拼接字符串hello与字符串world

paste(hello,world)2将拼接好的字符串中的h和w替换为a

gsub(h|w,a,hello

sort(islands)nameDF-data.frame(IDc(1,2,3,4,5),Namec(“张三”,“李四”,“王五”,“赵六”,“小七))

scoreDF-data.frame(IDc(1,2,4),Scorec(60,90,50))将上述两个数据框进行结合保留所有数据

merge(nameDF,scoreDF,byID)使用dplyr筛选nba2021数据集栏位名称为Name、ThreesMade、ThreesAttempted、FieldGoalsMade与FieldGoalsAttempted的五个栏位

NBA2021-fetch_NBAPlayerStatistics(“20-21)

library(dplyr)

select(NBA2021,Name,hreesMade,ThreesAttempted,FieldGoalsMade,FieldGoalsAttempted)注

下列中的FieldGoalsMade、FieldGoalsAttempted……均是数据中对应的列名

使用dplyr

1查看NBA2021数据集中命中率大于60%并且出场次数大于30场的球员资料

2查看出场分钟数超过1000分钟并且队伍名称为“BOS”或“SAN”的球员资料

(1)

filter4-filter(NBA2021,FieldGoalsMade/FieldGoalsAttempted0.6

GamesPlayed30)

TotalMinutesPlayed1000)使用dplyr对NBA2021数据集新增新栏位命中率

mutate(NBA2021,

命中率FieldGoalsMade/FieldGoalsAttempted)使用dplyr统计NBA2021数据集中的球员个数球队个数

summarise(NBA2021,

球队个数n_distinct(Team))使用dplyr计算NBA2021数据集中出场分钟数大于2500分钟的球员个数、平均投进的两分球数以及平均投出的两分球数

filter1

filter(NBA2021,TotalMinutesPlayed2500)

sum2

summarise(filter1,球员个数n(),平均投进的两分球数mean(FieldGoalsMade),平均出手数mean(FieldGoalsAttempted))使用dplyr对NBA2021数据集以出场分钟数以及出场次数对所有球员进行从大到小的排序

arrange(NBA2021,desc([出场分钟数列名]),desc([出场次数列名]))使用dplyr计算NBA2021数据集以Team和Position作为分组依据的球员数、平均投进的两分球数以及平均投出的两分球数并依据平均投进的两分球数由大到小排序

dataout

group_by(NBA2021,Team,Position)%%summarise(球员数n(),平均投进的两分球数mean(FieldGoalsMade),平均出手数mean(FieldGoalsAttempted))%%arrange(desc(平均投进的两分球数)))使用data.table计算所有球员的平均出场数、平均犯规次数以及平均抄截次数

NBA2021-fetch_NBAPlayerStatistics(“20-21)

library(data.table)

NBA2021DT-data.table(NBA2021)#将data.frame类型转换为data.tableNBA2021DT[,.(平均出场数mean(GamesPlayed),平均犯规数mean(PersonalFouls),平均抢断数mean(Steals))]#GamesPlayed、PersonalFouls、Steals均为对应列名使用data.table计算所有出场数大于70的球员平均投进几颗三分球与两分球

NBA2021DT[GamesPlayed60,.(平均三分进球mean(ThreesMade),

平均两分进球mean(FieldGoalsMade))]使用data.table计算NBA各队的中锋球员数和他们的平均三分球出手次数

NBA2021DT[PositionC,.(.N,平均三分出手次数mean(ThreesAttempted)),byTeam]

#第一个参数

.(.N,平均三分出手次数mean(ThreesAttempted))中:

#.N表示在第一个参数条件下的总数量对鸢尾花数据集进行宽表转长表操作保留鸢尾花类别列

#宽表转长表

melt(资料框[宽表],id.vars需要保留的栏位)library(reshape2)

iris2

melt(iris,id.varsSpecies)#Species是鸢尾花类别列的列名使用ggplot函数对上述数据进行绘图横坐标为鸢尾花种类、y轴为value以鸢尾花种类进行颜色区分图形类别为点图

library(ggplot2)

ggplot(iris2,aes(Species,value,colorSpecies))

geom_point()使用ggplot函数对上述数据进行绘图横坐标为鸢尾花种类、y轴为value图形类别为点图点颜色为黄色、大小为3、透明度50%、点的形状为17

ggplot(iris2,aes(Species,value))geom_point(coloryellow,size3,alpha.50,shape17)对钻石数据集进行不放回随机抽取5000个数据作为新的数据集、根据数据集绘制点图x:克拉y:价格点的颜色以切割类型区分点的形状为18。

dia

diamonds[sample(nrow(diamonds),

1000),

#diamonds是钻石数据集ggplot(dia,aes(carat,price),colorcut)geom_point(shape18)请论述下列代码含义

library(treemap)

#加载指定的GNI2014数据集#使用treemap函数绘制矩形树状图

treemap(GNI2014,

vSizepopulation,#指定面积大小的列vColorGNI,

c(black,blue),#设置边框的颜色分别为fontsize.labels

list(c(center,center),c(left,top))#