weixin_48172266的博客

原创 又回来了~

原创 如何批量实现多行合并后居中

思路：1.先填充数据2.数据分类统计制作格式3.格式刷刷制作出的格式。

原创 MySQL语法以及执行顺序

我这个小白的理解是先从（from）那个表里找出符合条件（where），然后进行分组（group by ），再对分组进行条件筛选（having），再选出（select）我们想要的列，最后是排序。

原创 彻底删除MySQL

彻底删除MySQL步骤

原创 python自己整理的笔记：将数字转换为列表&将列表反向转换为数字

列表转换为数字，数字转换为列表

原创 数据库笔记

数据库，mysql一个总的概括的笔记，跟着课，自己记得，方便自己看的

原创 Python与R布尔值TRUE 和FALSE 的相互转换,Python R布尔值取反

Python与R布尔值TRUE 和FALSE 的相互转换,Python R布尔值取反

原创 R语言如何将路径中的\\转换为/

将\\转换为/这里用了原生字符可参考https://www.cnblogs.com/soldier-justice/p/15200277.html在R语言中，使用类似Python原生字符串的方式处理路径替换方法gsub("\\\\", "/", a)

原创 时间序列分析——基于R语言案例数据课后数据

去这个www.crup.com.cn网址搜，里面全都有。免费的。...

原创 R语言table转换为data.frame

在这里插入代码片

原创 R语言caret包preProcess（）标准化出现错误: Matrices or data frames are required for preprocessing

原因数据是AsIs格式的，默认为一列了，关于AsIs参考如下博客https://blog.youkuaiyun.com/weixin_48172266/article/details/117747605?spm=1001.2014.3001.5502R语言里面“AsIs“到底是啥，用的时候咋处理例子,hdi包里的riboflavin数据集，其中riboflavin$x为“AsIs“格式数据。library(hdi) preProcValues = preProcess(riboflavin$x, metho

原创 R语言里面“AsIs“到底是啥，用的时候咋处理

例子用的是hdi包中的一个riboflavin数据集（核黄素）library(hdi)dim(riboflavin)这里我没用head(riboflavin),因为变量太多了。这里用的dim(),可以看出来这个数据集里面有71行2列，这里的两列分别是x和y。可以通过以下的代码看一下。riboflavin$xriboflavin$y可以看一下类型class(riboflavin$x)class(riboflavin$y)"AsIs"是啥看看大佬的解释吧，点击下面的链接然后进入

原创 R语言ggplot画条形图按照想要的顺序排列

加载所需要的包library(ggplot2)library(dplyr)创建数据集Year <- c(rep("2012" , 3) , rep("2013" , 3) , rep("2014" , 3) , rep("2015" , 3) )Legend <- rep(c("A" , "X" , "E") , 4)Count <- abs(rnorm(12 , 0 , 15))data <- data.frame(Year,Legend,Count)data

原创 超级简单的html转换为pdf格式方法

类似这样一个网页按住键盘上的ctrl+p（这个就是启动了打印选项）找到右上角那个地方，找到另存为PDF，然后这个网页就可以另存为PDF格式了。我以前也用插件，现在感觉这个方法好用就把插件卸载了。...

原创 ggplot中怎么使用类似par()的函数实现同时绘制多幅图

方法一library(ggplot2)library(patchwork)p1 <- ggplot(iris,aes(x=Sepal.Length))+geom_histogram(fill='#58a6a6')p2 <- ggplot(iris,aes(x=Sepal.Width))+geom_histogram(fill='#1c595a')p3 <- ggplot(iris,aes(x=Petal.Length))+geom_histogram(fill='#daae31'

原创 RStudio的help字体的调整大小

1.找到RStudio默认安装目录下的R.css文件C:\Program Files\RStudio\resources2.双击进入编辑一般就是直接进入记事本编辑了将红框那一块替换为body, td { /*font-family: Helvetica, sans-serif; */ font-family: 'Source Sans Pro', 'Lucida Grande', Verdana, Arial, sans-serif !important; font-si

原创 Rmarkdown输入空格

在这里将这个半角改成全角。也就是将上图月亮改成下图太阳。这种输入法状态下就可以输入空格并输出到html及其他格式。

原创 Github简单使用教程

注意下面的空格哈，我没用代码块1.下载git（我是联想电脑，所以用的联想电脑管家直接下载的）2.cmd命令行进入指定的文件夹后用下面命令D:\文档\Git\kaggle3.配置git config --global user.name ‘LiuKai6k6k’LiuKai6k6k为我的github账号名git config --global user.email ‘liukai6k6k@gmail.com’liukai6k6k@gmail.com’是我的邮箱4.检查配置git confi

原创 R语言backtest函数

Tsay, Ruey S. 2013. 金融数据分析导论：基于R语言. 机械工业出版社.原始版本："backtest" <- function(m1, rt, orig, h, xre=NULL, fixed=NULL, inc.mean=TRUE){ # m1: is a time-series model object # orig: is the starting forecast origin # rt: the time series # xre: the indepen

原创 No module named ‘plotly.validators.scatter3d._scene‘(python)

问题描述我在看titanic-top-solution时候发现那个三维的图没有显示出来，然后出现了No module named 'plotly.validators.scatter3d._scene，解决方案安装下面两个包pip install plotlypip install cufflinks

原创 R语言求矩阵的秩

qr(data)$rank

原创 R语言输出为eps格式的图片，latex

library(grDevices)cairo_ps("C:\\Users\\10539\\Desktop\\whatever.eps")plot(data)title(main="n = 30,p = 8,σ = 4,ρ= 0.9", col.main="black") dev.off()

原创 R老版本的网址

https://cran.r-project.org/bin/windows/base/old

原创 R语言中有inf的数据怎么求平均

数据例如下面的数据data：col1 col2 col3A 2 2B 5 infC 4 3我们想用col2中的5代替inf代码mean(ifelse(data$col3 == Inf, data$col2, data$col3))

原创 R语言将数字类型转换为百分数

val <- c(0.12,0.23,2.33)scales::percent(val, 0.01)[1] “12.00%” “23.00%” “233.00%”

原创 R语言查看每列的缺失值

代码library(tidyverse)library(naniar)data %>% miss_var_summary()注%>%为管道函数，不懂可以看下面的链接管道函数miss_var_summary在naniar包里面

原创 R语言将字符串中的数字提取出来作为值

用到的函数extract()例子首先构造数据week <- c("week1","week2","week3","week4")value <- c(5,6,7,8)data <- data.frame(week,value)week value1 week1 52 week2 63 week3 74 week4 8extract(data,week,"week","(\\d)",convert = TRUE)#(\\d)表示任意

原创 R语言str_c函数

将多个字符串合并成一个字符串格式：str_c(…, sep = “”, collapse = NULL)三个参数的意思… 表示的是多个字符向量sep:要在输入向量之间插入的字符串collapse：用于将输入向量组合成单个字符串的可选字符串这翻译的都不像人话，直接看例子吧例子str_c("Letter: ", letters)[1] “Letter: a” “Letter: b” “Letter: c” “Letter: d” “Letter: e”[6] “Letter: f” “

原创 R语言统计列中每个字符串的长度

R语言统计列中每个字符串的长度library(tidyverse)str <- c("yuwen","shuxue","yingyu","zhengzhi","lishi","dili")str <- as_tibble(str)#转化为tibble才有列名str %>%mutate(strlen = str_length(value))A tibble: 6 x 2value strlen 1 yuwen 52 shuxue

原创 R语言everything()函数

这个函数在dplyr包里面这个函数主要是用来选出所有的变量。例子library(tidyverse)# For better printingiris <- as_tibble(iris)#Use everything() to select all variables:iris %>% select(everything())#> # A tibble: 150 x 5#> Sepal.Length Sepal.Width Petal.Length P

原创 Error in plot.new() : figure margins too large

画图区域太小了，把下图的区域拖的大一些就好了

原创 R语言rmarkdown中怎么添加交互图表

这个例子不好做，做了在这里展示的也只是个图片，而不是个交互的图表R语言交互式图表原始的网址：https://bookdown.org/xiao/RAnalysisBook/r-markdown.html#section-5.7

原创 R语言提取一列以“字符”开头的行

例如取出mtcars中的Merc车的几行mtcars[grep("Merc",rownames(mtcars)),]Merc 240D 24.4 4 146.7 62 3.69 3.19 20.0 1 0 4 2Merc 230 22.8 4 140.8 95 3.92 3.15 22.9 1 0 4 2Merc 280 19.2 6 167.6 123 3.92 3.44 18.3 1 0 4 4Merc 280

原创 R语言求任意两个日期的天数

begin = as.Date("2021-03-15")end = as.Date("2021-05-04")difftime(end, begin, units = "weeks")difftime(end, begin, units = “weeks”)difftime(end, begin, units = "hours")Time difference of 1200 hours可以用这个函数看看自己的人生经过了多少年，各位要好好珍惜自己的时间。...

原创 R语言lubridate包（处理时间数据的专用包）

加载包# install.packages(lubridate)library(lubridate)第一个函数ymd():解析日期为年月日格式x <- c("09-01-01", "09-01-02", "09-01-03")ymd(x)[1] “2009-01-01” “2009-01-02” “2009-01-03”x <- c("2009-01-01", "2009-01-02", "2009-01-03")ymd(x)[1] “2009-01-01” “200

原创 R语言相关性分析及通过corrplot函数画出一些好看的相关关系图

数据集我们以内置的mtcars为例，至于里面的每个变量是啥意思，可以看下面的[, 1] mpg Miles/(US) gallon[, 2] cyl Number of cylinders[, 3] disp Displacement (cu.in.)[, 4] hp Gross horsepower[, 5] drat Rear axle ratio[, 6] wt Weight (1000 lbs)[, 7] qsec 1/4 mile time[, 8] vs Engine (0 =

原创 R语言怎么将“[3, 4, 5, 6]“转换为数字格式

x <- "[3, 4, 5, 6]"x <- gsub("\\[|\\]","", x)y <- as.numeric(unlist(strsplit(x, ",", fixed=TRUE)))y#> [1] 3 4 5 6

原创 python,numpy库中面向ndarray的ravel()和flatten()函数

生成一个二维array数组import numpy as npa=np.array([[1,2,3],[4,5,6]])aOut[3]:array([[1, 2, 3],[4, 5, 6]])flatten()numpy.ndarray.flatten 返回一份数组拷贝，对拷贝所做的修改不会影响原始数组格式：ndarray.flatten(order=‘C’)参数说明：order：‘C’ – 按行，‘F’ – 按列，‘A’ – 原顺序，‘K’ – 元素在内存中的出现顺序。a.fl

原创 AttributeError: ‘DataFrame‘ object has no attribute ‘ix‘

试试df.iloc[:, integer]、.ix 已经不用了

原创 ‘numpy.ndarray‘ object has no attribute ‘unique‘

import numpya = numpy.array([0, 3, 0, 1, 0, 1, 2, 1, 0, 0, 0, 0, 1, 3, 4])unique, counts = numpy.unique(a, return_counts=True)dict(zip(unique, counts)){0: 7, 1: 4, 2: 1, 3: 2, 4: 1}