本文介绍Origin、MathType、Endnote20、SPSS、论文切分、论文纠错查重等相关笔记


目录

  1. Office相关
    1. Word相关
    2. 设置Office不压缩图像
    3. 公式里某些括号右边下标无法保存
  2. Origin使用
    1. Origin插件下载
    2. Origin模板的使用
    3. 画双Y轴
    4. 屏蔽三维荧光中的瑞利散射
    5. XPS分峰添加阴影
      1. 方案1
      2. 方案2
      3. 方案3(不推荐)
    6. 其他问题
  3. MathType
    1. 插入带编号的公式
    2. 自动编号失效
    3. 隐藏分隔符
    4. 禁用插件
  4. Endnote使用
    1. 文献style文件存放目录
    2. 插入后显示{Author,#year}
    3. 修改杂志的缩写
    4. 修改引用格式
    5. 修改显示页码
    6. Word引用的Endnote库部分丢失或不全
  5. SPSS 22使用
    1. 下载并安装
    2. ANOVA分析
  6. 论文纠错
    1. 中文
    2. 英文
  7. 论文查重
    1. 每天免费查重一次的网站
    2. 无限查重
  8. 一些色彩代码
  9. WPS word拆分
  10. 参考

Office相关

三大组件生成的文档都可以改名为.zip后解压查看

Word相关

使用撇号的时候用',而不是,有时候会出现显示问题,值得注意
在编辑文档前先设置好图片的分辨率,推荐330
如果文档较大的话,可以把文档后缀加.zip,解压后看看那些文件出了问题
删除全部图片:替换^p为空格
删除作者信息:文件->信息->右键删除
如果导出的pdf缺失部分图像:选项->显示->打印选项->打印在Word中创建的图形

设置Office不压缩图像

选项->高级->不压缩文件中的图像
如果图像过大,建议选择高保真,不影响打印和观看,如果是位图,建议使用png格式,体积又小质量又高jpg格式会出现色块
PS:貌似只针对单个文档生效

公式里某些括号右边下标无法保存

删除括号后重打


Origin使用

Origin插件下载

Tafel Extrapolation:Tafel拟合插件
Mask or Change Data in Contour:屏蔽点插件

Origin模板的使用

存模板
File -> Save Template As
使用模板
选中数据 -> Plot -> Template Library
尽量不要存一半是线一半是点的模板

画双Y轴

Origin的双Y轴的逻辑为X轴 Y1轴 X轴 Y2轴 X轴 Y1轴 X轴 Y2轴…

屏蔽三维荧光中的瑞利散射

下载Mask or Change Data in Contour插件,

XPS分峰添加阴影

方案1

在Plot Details中选中曲线 -> Fill Area Under Curve Enable -> Normal/Base Auto -> Pattern Fill里选Tow Colors
将Background线里的Fill改为白色,可以在线里调transparency

方案2

在Plot Details中选中曲线 -> Fill Area Under Curve Enable -> File to date plot- One Color -> Pattern Fill里选Tow Colors
可以在线里调transparency

方案3(不推荐)

单击选中曲线 -> Gadgets -> Integrate
在弹出的Dialog的Integration勾选Keep the shading color after New Output, Baseline里的Mode选Use Exitsting Dateset,选择好积分位置后点击阴影右上角箭头,选择New Output,后点X关闭
双击阴影,在Dialog的Fill选项的Gradient Fill里选择Two Colors

其他问题

如果出现峰相互遮住的话,双击页面左上角的1,打开PlotSetup,在出现的菜单里上下调整曲线
如果需要自定义刻度内容,在Tick Lable -> Display里设置Type -> Tick-indexed string 再设置String内容,用空格隔开


MathType

插入带编号的公式

MathType->插入编号
节编号:✓
公式编号:✓
附件:()
分隔符:-
新的公式编号:✓
整个文档:✓
自动更新公式编号:✓

自动编号失效

实测格式化公式不行,再插入一下公式就行

隐藏分隔符

样式->MTEquationSection->修改样式->格式—>字体->隐藏->确定

禁用插件

C:\Program Files\Microsoft Office\root\Office16\STARTUP里的MathType Commands 2016.dotm后缀名改了


Endnote使用

谨记:Endnote导入的文献可能不规范,请注意期刊是否简写,或首字母是否大写,导出文献后检查上下标和菌种斜体

文献style文件存放目录

可自行编辑后分析存储
C:\Users\你的用户名\Documents\EndNote\Styles
放在安装目录里也行,一般是
C:\Program Files (x86)\EndNote 20\Styles

插入后显示{Author,#year}

插入文献后,点击一下Bibliography里面的Update Citation and Bibliography

修改杂志的缩写

菜单 -> “Tools” -> “Output Style” -> “Edit” -> “Journal Name” -> “Abbreviation X”
菜单 -> “Library” -> “Open Term List” -> “Journals Term List”-> “Edit Term”
Term文件位置”/PATH/Terms Lists”

修改引用格式

菜单 -> “Tools” -> “Output Style” -> “Edit” -> “Bibliography” -> “Templates”
引文格式位置”/PATH/Style”

修改显示页码

菜单 -> “Tools” -> “Output Style” -> “Edit” -> “Page Number” -> Show the full range of pages

Word引用的Endnote库部分丢失或不全

Word角标->右键->Edit Citation->More->Tools->Export traveling library


SPSS 22使用

下载并安装

SPSS 22 64bit激活码

1
9DNCAF2O3QVDV7FBIO696OO6GWLNXZPPRYTPWF2PPX7C8T6Y24LMVV2ET7DOLX5CXAL5YDLL79UPGEFCPDXP5Q8O5E

ANOVA分析

将数据整理整理好,其中一组为带注释编号的一个分组

菜单-分析-比较平均值-单因素ANOVA

因变量列表添加因素,因子填分组编号的那一组
选项勾选描述性,事后多重比较勾选LSD,Waller-Duncan

在均一子集里找到分组


论文纠错

中文

秘塔写作猫:写中文论文巨好用,每日免费3000字
爱校对:并不是很聪明的样子,但是人家免费,还有集成Office插件
讯飞智检:感觉好贵
Chinesecorrection:老外出的

英文

微软爱写作:国内的,不知道为什么要碰瓷微软
火山写作
Wordtune:英语语法检查器,注册登陆需能访问Google
Grammarly:英语语法检查器,不太稳定
Quillbot:英语句式/单词替换,注册登陆需能访问Google
Spinbot:跟Quillbot差不多
Virtualwritingtutor:好像用不了

论文查重

在查重的时候,最好将所有图片删除,更不能有类似Origin对象的原始数据存在,数据可能存在泄漏的风险,别问我怎么知道的

每天免费查重一次的网站

如果要付费的话,可能打开方式不对
PaperYY
PaperGe
PaperAsk
PaperWord
论文狗
PaperLike

无限查重

PapeRed
PaperCrazy

一些色彩代码

墨绿:#669999
粉紫:#C597E6
亮绿:#8EFF8E
粉红:#FAB1D8
蟹黄:#FFA74F
亮蓝:#4ADDC7
青:#00CBCC
棕:#7D4E4E
橙:#FB6501
RainBow
红ED5F5F
橙FFA74F
黄FEF8BC
绿B0FFB0
青6FFFFF
蓝64B1FF
紫6760F7


WPS word拆分

按Alt+F11键打开VB,新建一个模块,填入下面代码,点运行->运行子过程/窗体,结束就好了

Word拆分代码
  • VBA
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
Option Explicit
Sub DynamicSplitPagesAsDocuments()
Dim oSrcDoc As Document, oNewDoc As Document
Dim strSrcName As String, strNewName As String
Dim oRange As Range
Dim nIndex As Integer, nSubIndex As Integer, nTotalPages As Integer, nBound As Integer
Dim fso As Object
Const nSteps = 2
Set fso = CreateObject("Scripting.FileSystemObject")
Set oSrcDoc = ActiveDocument
Set oRange = oSrcDoc.Content
nTotalPages = ActiveDocument.Content.Information(wdNumberOfPagesInDocument)
oRange.Collapse wdCollapseStart
oRange.Select
For nIndex = 1 To nTotalPages Step nSteps
Set oNewDoc = Documents.Add
If nIndex + nSteps > nTotalPages Then
nBound = nTotalPages
Else
nBound = nIndex + nSteps - 1
End If
For nSubIndex = nIndex To nBound
oSrcDoc.Activate
oSrcDoc.Bookmarks("\page").Range.Copy
oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage
Application.Browser.Next
oNewDoc.Activate
oNewDoc.Windows(1).Selection.Paste
Next nSubIndex
strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _
fso.GetBaseName(strSrcName) & "_" & (nIndex \ nSteps) & "." & fso.GetExtensionName(strSrcName))
oNewDoc.SaveAs strNewName
oNewDoc.Close False
Next nIndex
Set oNewDoc = Nothing
Set oRange = Nothing
Set oSrcDoc = Nothing
Set fso = Nothing
MsgBox "结束!"
End Sub

参考

如何根据SPSS中LSD方差分析结果标记字母
【MathType 7.4】公式分章节编号,实现(1-1)、(2-1)
MathType分隔符显示与隐藏
按指定页数动态拆分Word文档,这样的Word拆分真是太实用了!