中国大学moocr语言与金融数据分析慕课答案大全-k8凯发

k8凯发-凯发官网入口计算机类习题 正文

第一章：r简介

第一章测试

1、下列是“取余”操作运算符的是（）。
    a、%
    b、%%
    c、%/%
    d、/

2、将数据框x中含有的na值换成0，使用的函数是（）。
    a、x <-na.omit(x)
    b、x[,is.na(x)] <- 0
    c、x[is.na(x)] <- 0
    d、is.na(x) <- 0

3、使用代码 x <- 1024；length(x) 后，得到的x的长度为4。

4、利用list.files()函数可以读取当前目录下的文件夹。

5、可以把向量、矩阵、数据框、列表、数组放在一个列表里。

第一章作业

1、1.1 练习向量 1）怎么生成向量：“金融1601甲、金融1601乙、金融1602甲、金融1602乙、金融1603甲、金融1603乙、金融1604甲、金融1604乙” 2）随机产生一个包括负数和正数的向量，负数采用1-负数替代，即-3变成4，正数用1 正数替代，即2变成3，怎么编写代码？

2、1.2 练习矩阵 1）产生随机数，形成矩阵，负的1-该数，正的1加该数 2）如何取矩阵上三角和下三角矩阵

第二章：r基本操作

第二章测试

1、两个数据框进行行合并，哪个函数不能用
    a、cbind()
    b、rbind()
    c、merge()
    d、reshape()

2、输出csv格式的文件，用一下哪个函数
    a、read.table()
    b、read.csv()
    c、write.csv()
    d、write.delim()

3、如何用as.date()函数将'2-2013-1'转化成"2013-01-02"
    a、as.date('2-2013-1',format='%d-%y-%m')
    b、as.date('2-2013-1',format='%d-%y-%m')
    c、as.date('2-2013-1',format='%m-%y-%d')
    d、as.date('2-2013-1',format='%y-%m-%d')

4、有一列数据x <- c(3，6，7，4，1)，order(x,decreasing=t)输出的结果是()
    a、1 3 4 6 7
    b、5 1 4 2 3
    c、3 2 4 1 5
    d、1 2 3 4 5

5、有a和b两个公共列的数据框，如何用merge()函数按a数据框将a，b两个数据框合并
    a、merge(a,b,all=t)
    b、merge(a,b,all.x=t)
    c、merge(a,b,all.y=t)
    d、cbind(a,b)

第二章作业

1、2.1 练习新变量生成和数据重新编码 1）从wdi分别下载所有国家2016年和2017年gdp数据 2）计算经济增长（放在2017年的表里） 3）产生一个新变量level（放在2017年的表里），经济增长小于等于-5%的标i，大于-5%小于等于0的标ii，大于0%小于等于5%的标为iii，大于5%小于等于10%标为iv，大于10%标为v

第三章：r编程基础

第三章测试

1、x<-c(true,false,false)，y<-c(true,true,false))，运行x&&y这行代码是什么结果
    a、true
    b、true false false
    c、both true
    d、false

2、f3 <- function(a123,b12,b13){list(a=a123,b1=b12,b2=b13)} ，构建一个函数，该函数为三个向量构成的列表，函数包括三个参数。则f3(2,3,a123=1)$a的结果为
    a、$a [1] 2
    b、$a [1] 3
    c、$a [1] 1
    d、$a [1] a123

3、函数可以没有函数名。

4、函数主体可以没有返回语句。

5、d是一个矩阵，x<-apply(d,2,f)这行代码中，apply是对d这个矩阵每一行运用函数。

第三章作业

1、3.1 小王贷款100万购买房子，贷款利率为4.9%（年利率），贷款期限20年。 1）用循环执行语句（for或者while），分别计算等额本金还款和等额本息还款的每月偿还本金、偿还利息、偿还本息、剩余本金 2）以数据框的形式给出。 3）计算两种还款方式的利息差额。 其中等额本金每月偿还本金 = 贷款总额/贷款月数 等额本息每个月的偿还本息 = 贷款总额*月利率*(1 月利率)^贷款月数/[(1 月利率)^贷款月数-1]

第四章：r做图基础

第四章测试

1、自定义坐标轴函数axis()的参数中，用于添加坐标轴刻度标签的是（）
    a、at=
    b、labels=
    c、font=
    d、tick=

2、图例函数legend()的参数中，用legend=指定的是（）
    a、图例内容的字符向量
    b、图例内容的颜色
    c、图例边框的类型
    d、图例内容的线条宽度

3、以下命令中，能够画出3行2列的多重图框且第2幅图在第二行第一列的是（）
    a、par(mfrow = c(2,3))
    b、par(mfrow = c(3,2))
    c、par(mfcol = c(3,2))
    d、par(mfcol = c(2,3))

4、高级绘图函数中，可以将坐标轴标签禁用的参数是（）
    a、axex=f
    b、axex=t
    c、ann=f
    d、ann=t

第四章作业

1、简化图形类型代码 par(mfrow=c(2,4)) plot(c(1:3),c(2:4),type = "p", main =paste("type=","p",sep="") ) plot(c(1:3),c(2:4),type = "l", main =paste("type=","l",sep="") ) plot(c(1:3),c(2:4),type = "b", main =paste("type=","b",sep="") ) plot(c(1:3),c(2:4),type = "o", main =paste("type=","o",sep="") ) plot(c(1:3),c(2:4),type = "h", main =paste("type=","h",sep="") ) plot(c(1:3),c(2:4),type = "s", main =paste("type=","s",sep="") ) plot(c(1:3),c(2:4),type = "s", main =paste("type=","s",sep="") ) plot(c(1:3),c(2:4),type = "n", main =paste("type=","n",sep="") )

第五章：r与债券市场和金融衍生品市场的应用

第五章测试

1、5.对债券现金流的贴现的函数以下那种写法是正确的 （ ）
    a、a cfs <- 100 * (rep(couponrate/frequency, n) c(rep(0, n ),1))
    b、b cfs <- 100 * (rep(couponrate/frequency, n-1) c(rep(0, n - 1),1))
    c、c cfs <- 100 * (rep(couponrate/frequency, n) c(rep(0, n - 1))
    d、d cfs <- 100 * (rep(couponrate/frequency, n) c(rep(0, n - 1),1))

2、在计算债券久期时，修正久期等于麦考利久期除以（1 到期收益率），考虑付息频率的话， 代码形式可以为moddur<-macdur/(1 requiredyld/frequency )。

3、计算某日期前后若干个月的日期的函数中的%/%符号是对某数求余，而%%符号是计算整除的商。

4、在计算债券每一天净价和全价时， sapply和lapply函数都可以对产生的时间序列循环计算。

5、每一个r函数都包括三个部分：函数名，程序主体以及参数集合。如果最后一行不输出结果，整个函数也将不会有返回值

第五章作业

1、假想某只债券在上海证券交易所交易，其面值为100元，票面利率为4%，每半年支付一次利息，2025年4月11日到期。，并假设在该期间债券的收益率维持在3%的水平不变。 (1)编写函数计算该债券于2019年11月13日至2022年11月13日期间每天的净价、全价和应计利息的变化，并以数据框的形式给出。 (2)并用ggplot2画出债券价、全价和应计利息的变化。

第六章：r与风险管理

第六章测试

1、度量市场风险目前最常用的在险价值的缩写是（）。
    a、var
    b、var
    c、var
    d、var

2、正态分布法计算var时，获取正态分布分位点的函数是（）。
    a、norm
    b、qnorm
    c、prob
    d、alpha

3、在厚尾分布中，尾部的分布密度比正态分布小。

4、实际市场上股票收益率的分布更接近尖峰厚尾，并非标准正态。

5、莫顿模型是国际上比较流行的信用风险度量模型。

第六章作业

1、试通过以下方法计算万科a（000002.sz）在下一交易日，有95%的概率，收盘价对数收益率不低于多少。假设给定数据窗口为2018.01.01-2019.01.01。 1.正态分布法；

2、2.weibull分布法；

3、3.历史模拟法。

期末考试

r语言与金融数据分析

1、将数据框x中含有的na值换成0，使用的函数是。（）
    a、x <- 0=[ na.omit(x)]
    b、x[,is.na(x)] <- 0
    c、x <- is.na(x) = 0
    d、x[is.na(x)] = 0

2、读取csv格式的文件，用一下哪个函数
    a、read.csv()
    b、read.table()
    c、read.delim()
    d、write.csv()

3、如何用as.date()函数将'1-2013-2'转化成"2013-01-02"
    a、as.date('1-2013-2',format='%d-%y-%m')
    b、as.date('1-2013-2',format='%d-%y-%m')
    c、as.date('1-2013-2',format='%m-%y-%d')
    d、as.date('1-2013-2',format='%m-%y-%d')

4、有一个3行3列的数据框xx，对xx的两列数据进行排序，xx[order(xx[ , 2], -xx[ , 3]) ,] 的结果为：
    a、第2列升序，第3列降序
    b、第2列升序，第3列升序
    c、第2列降序，第3列升序
    d、第2列降序，第3列降序

5、x<-c(true,false,false)，y<-c(true,true,false))，运行x&&y这行代码是什么结果 （）
    a、true false true
    b、true
    c、true false false
    d、false

6、执行命令 x <- 0:4 ; y <- ifelse ( x > 1 , -x , 2x ) ; y 后的结果是。
    a、[1] 2 3 4 [2]-2 -3 -4 [3] 4 6 8
    b、[1] 0 1 2 3 4
    c、[1] 0 2 -2 -3 -4
    d、[1] -2 -3 -4 [2] 4 6 8

7、一般一个函数包括哪四个部份。（）
    a、函数内容、函数声明、函数语句、函数变量
    b、函数形式、函数内容、函数变量、函数参数
    c、函数名称、函数主体、函数输入、函数输出
    d、函数名称、函数声明、函数主体、函数参数

8、以下命令中，能够画出3行2列的多重图框且第2幅图在第一行第二列的是（）
    a、par(mfrow = c(2,3))
    b、par(mfrow = c(3,2))
    c、par(mfcol = c(3,2))
    d、par(mfcol = c(2,3))

9、图例函数legend()的参数中，用legend=指定的是（）
    a、图例内容的字符向量
    b、图例内容的颜色
    c、图例边框的类型
    d、图例内容的线条宽度

10、度量市场风险目前最常用的在险价值的缩写是（）
    a、var
    b、var
    c、var
    d、var

11、rbind()函数，cbind()函数，merge()函数都可以实现数据的合并。

12、r中常见的逻辑运算符x | y表示同时满足x和y。

13、d是一个数值矩阵，x<-apply(d,2,sum)这行代码中，apply是对d这个矩阵中每一行的元素进行求和。

14、在计算债券久期时，修正久期等于麦考利久期除以（1 到期收益率），考虑付息频率的话，代码形式可以为moddur<-macdur/(1 requiredyld/frequency )。

15、在厚尾分布中，尾部的分布密度比正态分布大。

期末考试

r语言与金融数据分析

1、将数据框x中含有的na值换成0，使用的函数是。（）
    a、x <- 0=[ na.omit(x)]
    b、x[,is.na(x)] <- 0
    c、x <- is.na(x) = 0
    d、x[is.na(x)] = 0

2、读取csv格式的文件，用一下哪个函数
    a、read.csv()
    b、read.table()
    c、read.delim()
    d、write.csv()

3、如何用as.date()函数将'1-2013-2'转化成"2013-01-02"
    a、as.date('1-2013-2',format='%d-%y-%m')
    b、as.date('1-2013-2',format='%d-%y-%m')
    c、as.date('1-2013-2',format='%m-%y-%d')
    d、as.date('1-2013-2',format='%m-%y-%d')

4、有一个3行3列的数据框xx，对xx的两列数据进行排序，xx[order(xx[ , 2], -xx[ , 3]) ,] 的结果为：
    a、第2列升序，第3列降序
    b、第2列升序，第3列升序
    c、第2列降序，第3列升序
    d、第2列降序，第3列降序

5、x<-c(true,false,false)，y<-c(true,true,false))，运行x&&y这行代码是什么结果 （）
    a、true false true
    b、true
    c、true false false
    d、false

6、执行命令 x <- 0:4 ; y <- ifelse ( x > 1 , -x , 2x ) ; y 后的结果是。
    a、[1] 2 3 4 [2]-2 -3 -4 [3] 4 6 8
    b、[1] 0 1 2 3 4
    c、[1] 0 2 -2 -3 -4
    d、[1] -2 -3 -4 [2] 4 6 8

7、一般一个函数包括哪四个部份。（）
    a、函数内容、函数声明、函数语句、函数变量
    b、函数形式、函数内容、函数变量、函数参数
    c、函数名称、函数主体、函数输入、函数输出
    d、函数名称、函数声明、函数主体、函数参数

8、以下命令中，能够画出3行2列的多重图框且第2幅图在第一行第二列的是（）
    a、par(mfrow = c(2,3))
    b、par(mfrow = c(3,2))
    c、par(mfcol = c(3,2))
    d、par(mfcol = c(2,3))

9、图例函数legend()的参数中，用legend=指定的是（）
    a、图例内容的字符向量
    b、图例内容的颜色
    c、图例边框的类型
    d、图例内容的线条宽度

10、度量市场风险目前最常用的在险价值的缩写是（）
    a、var
    b、var
    c、var
    d、var

11、rbind()函数，cbind()函数，merge()函数都可以实现数据的合并。

12、r中常见的逻辑运算符x | y表示同时满足x和y。

13、d是一个数值矩阵，x<-apply(d,2,sum)这行代码中，apply是对d这个矩阵中每一行的元素进行求和。

14、在计算债券久期时，修正久期等于麦考利久期除以（1 到期收益率），考虑付息频率的话，代码形式可以为moddur<-macdur/(1 requiredyld/frequency )。

15、在厚尾分布中，尾部的分布密度比正态分布大。