dim

线性回归 从零开始 生成/准备数据集 读取数据集 初始化模型参数 正态分布初始化：np.random.normal(loc(均值),scale(标准差),size(输出形状)) 全零初始化：np.zeros() 定义模型 torch.mm(矩阵相乘） torch.mul(点乘） 定义损失函数 均方损失函数 交叉熵损失函数 定义优化函数 小批量随机梯度下降，参数-学习率*梯度/batch_size 训练 前向传播 求损失 反向传播 优化参数 梯度清零 pytorch简介实现 Dataloader使用 import torch.utils.data as Data batch_size = 10 # combine featues and labels of dataset dataset = Data.TensorDataset(features, labels) # put dataset into DataLoader data_iter = Data.DataLoader( dataset=dataset, # torch TensorDataset format batch_size=batch_size, # mini batch size shuffle=True, # whether shuffle the data or not num_workers=2, #

直接从代码中学习tensor的一些维度变换操作: import torch torch . manual_seed ( 2020 ) x = torch . rand ( 1 , 2 , 3 ) print ( x ) # tensor([[[0.4869, 0.1052, 0.5883], # [0.1161, 0.4949, 0.2824]]]) print ( x . view ( - 1 , 3 ) . size ( ) ) # torch.Size([2, 3]) print ( '\ntranspose:' ) print ( torch . transpose ( x , 0 , 1 ) ) print ( x . transpose ( 0 , 1 ) . size ( ) ) # torch.Size([2, 1, 3]) print ( x . transpose ( 1 , 2 ) . size ( ) ) # torch.Size([1, 3, 2]) # transpose要指明待交换的维度 print ( '\ntorch.cat:' ) y = torch . rand ( 1 , 1 , 3 ) print ( torch . cat ( ( x , y ) , dim = 1 ) . size ( ) ) # torch.Size([1, 3, 3

笔者测试环境VS2019。 基本介绍 原书作者引入Julia Sets意在使用GPU加速图形的绘制。Julia Set 是指满足下式迭代收敛的复数集合 \[ Z_{n+1}=Z_{n}^2+C \] 环境配置 跑这个例子的主要困难应该在于配置环境。这个程序依赖于openGL中的glut库。由于VS2019的整个软件架构发生了很大变化，一些链接库和头文件的位置都发生了改变，因此一些文章中的配置方法失效了。 首先我们需要获取glut库的头文件以及动态链接库。 点击这里 cg-toolkit 获取。安装成功之后，找到C:\Program Files (x86)\NVIDIA Corporation\Cg。注意勾选安装选项的x64相关应用。 将其中的 lib 文件夹中的_glut32.lib_复制到C:\Program Files (x86)\Windows Kits\10\Lib\10.0.18362.0\ucrt\x86 将其中的 lib.x64 文件夹中的 glut32.lib 复制到C:\Program Files (x86)\Windows Kits\10\Lib\10.0.18362.0\ucrt\x64并且重命名其为 glut64.lib 笔者运行的是64位系统，就将 bin.x64 中的_glut32.dll_复制到C:\Windows\System32下 在这里

继续 上一篇文章，总结一下下面五集的知识 视频六 变量   数据类型（Boolean<布尔值>,Byte<字节，0-255>,Integer,<整型，a%>Long<长整型，四个字节&>,SIngle<单精度浮点！>,Double<双精度浮点#>,String<字符串$，可变长>,Date, Currency, Object, User-Defined,variant）   类型转换函数 ASc,chr,cbool,cbyte   1.Ascii、ANsi、DBCS（双字节字符集）、Unicode。Ascii的前128个和Ansi一样 视频七 常量和变量 String、Single   语言转换 考虑到程序的不同用户使用，就要选择前面带C的，这样就更符合本机配置的使用。 变量与变量定义声明   定义变量格式：<类型> <名字> 、首字母大写 private（专用变量）、public（全局变量）、static（静态变量）、redim Dim 语法：Dim【withevent】varname【(subscripts)】【AS【New】type】… 说明：Withevents：; New： 例如：比较Dim A AS Integer，B AS Long 和Dim A as integer；Dim B As long 和Dim A，B As long 常量：不区分大小写、 常量的定义声明：

tensor.squeeze(dim) 作用 : 如果dim指定的维度的值为1，则将该维度删除，若指定的维度值不为1，则返回原来的tensor 例子： x = torch . rand ( 2 , 1 , 3 ) print ( x ) print ( x . squeeze ( 1 ) ) print ( x . squeeze ( 2 ) ) 输出： tensor([[[0.7031, 0.7173, 0.0606]], [[0.6884, 0.4072, 0.0516]]]) tensor([[0.7031, 0.7173, 0.0606], [0.6884, 0.4072, 0.0516]]) tensor([[[0.7031, 0.7173, 0.0606]], [[0.6884, 0.4072, 0.0516]]]) 如上结果所示：x.shape=[2, 1, 3] ， 第一维度的值为1， 因此x.squeeze(dim=1)的输出会将第一维度去掉，其输出shape=[2,3]， 第二维度值不为1, 因此x.squeeze(dim=2)输出tensor的shape不变 tensor.unsqueeze(dim) 这个函数主要是对数据维度进行扩充。给指定位置加上维数为1的维度，比如原本有个三行的数据（3，），在0的位置加了一维就变成一行三列（1,3）。还有一种形式就是b

新建一个工作表，命名后保存到和与合并的100个文件同一个文件文件夹，摁 alt + f11,双击工程资源管理器里面的sheet1(sheet1),在右侧的代码区粘贴如下代码。运行。等候一会就OK了。 Sub 合并当前目录下所有工作簿的全部工作表() Dim MyPath, MyName, AWbName Dim Wb As Workbook, WbN As String Dim G As Long Dim Num As Long Dim BOX As String Application.ScreenUpdating = False MyPath = ActiveWorkbook.Path MyName = Dir(MyPath & "\" & "*.xls") AWbName = ActiveWorkbook.Name Num = 0 Do While MyName <> "" If MyName <> AWbName Then Set Wb = Workbooks.Open(MyPath & "\" & MyName) Num = Num + 1 With Workbooks(1).ActiveSheet .Cells(.Range("A65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4) For G = 1

UFT自动化测试脚本，连接数据库类 【带有 ’ 的表示注释行】 '创建连接数据库类 Class database '创建类 Dim cnglobal Dim odatabase Dim sdbname Dim txtsql Dim rs 'dim是定义变量 Public Function opendatabase() '创建函数, 打开数据库的函数 Set cnglobal=createobject("ADODB.connection") '创建一个数据库连接对象，但是还没连接数据库 cnglobal.CommandTimeout=8 '查询数据库所用的总时间 On error resume Next '加上此语句后，如果后面的程序出现"运行时错误"时，会继续运行，不中断 cnglobal.Open "Provider=OraOLEDB.Oracle.1;Password=bjmedicare;Persist Security Info=True;User ID=bjmedicare;Data Source=oracle33" '使用程序自带的open方法打开数据库， provider是连接字符串的意思，OraOLEDB.oracle是来自oracle的驱动，.1是指版本号 'password是数据库密码，security info=true表示

while语句 while cells(i,2) <> “” 可用来检查内容是否为空，来标记是否到尾巴了 Sub highlightquick() Dim i As Integer i = 2 While Cells(i, 2) <> "" '判断是否为空 If Cells(i, 2) > 500 Then '判断单元格的数值 Cells(i, 2).Font.Bold = True '用来加粗 With Cells(i, 2).Font '用来改字体颜色 .Color = -16776961 .TintAndShade = 0 End With End If i = i + 1 Wend '和开头的while呼应 End Sub 同样完成和上一篇一样的任务，这次用while循环 这里解决的是没有空行的情况，有空行的情况之后再谈 如果要判断一行中任一列不为空就执行，可以改为 While Cells(i, 2) <> "" or Cells(i, 3) <> "" 实际编程中用do while 更多 Sub highlightquick() Dim i As Integer i = 2 Do While Cells(i, 2) <> “” '判断是否为空 If Cells(i, 2) > 500 Then '判断单元格的数值 Cells(i, 2).Font.Bold = True

打开不同的EXCEL文件并汇总 Option Explicit Sub 季度汇总() Dim i, j, k, fileName, wkPath Dim w As Worksheet, r As Worksheet, wb As Workbook '首先，让 r 代表当前工作簿（“季报.xlsm”)的汇总表 Set r = ActiveWorkbook.Worksheets("季度汇总") 'ActiveWorkbook.Path属性可以返回本工作簿所在的文件夹， '因此当其他待处理工作簿跟本工作簿在同一文件夹下时，可以用Path找到它们。 wkPath = ActiveWorkbook.Path '循环生成每个月的文件名，并打开相应工作簿 For i = 4 To 6 fileName = i & "月.xlsx" '标记文件名，这个例子中的名字都比较规律 Set wb = Workbooks.Open(wkPath & "\" & fileName) '让 w 指向该月文件的第一张工作表（即月报表） Set w = wb.Worksheets(1) '循环扫描该工作表的第3-10行，依次加到汇总表的同一行 For k = 3 To 10 For j = 3 To 6 '以下四行代码可以用循环的方式改写，更加方便 r.Cells(k, j) = r.Cells(k, j) + w

业务部门提出要做一个客户自助查询的系统，而且这个系统是要公布到互联网上的。这样的话，除了一般常见的防注入、服务器安全外，最简单的就是在用户登录处加一个验证码，可以在一定程度上加大恶意尝试破解用户密码的难度。 在网上搜索了一天的类似内容，做成了一个自己的小程序，与大家共同分享，并将使用过程中的小细节说一下，一则备忘，二则也许能让后来的朋友多了解到一点东西吧。 效果图： 老样子，先上代码。个人的习惯，对于做为系统的纯输出功能的代码，使用ashx文件（一般处理程序）而不是aspx文件，呵呵。 先建立一个verify_code.ashx文件，代码如下： 验证码图片生成程序 <%@ WebHandler Language="VB" Class="verify_code" %>Imports SystemImports System.DrawingImports System.Drawing.Drawing2DImports System.Drawing.ImagingImports System.Drawing.TextImports System.WebImports System.Web.SessionStateImports System.Web.ConfigurationPublic Class verify_code : Implements IHttpHandler,