自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+

麦好的AI乐园

机器学习、 智能计算、应用数学

  • 博客(35)
  • 资源 (5)
  • 收藏
  • 关注

原创 haskell(30)

haskell在数理逻辑中的应用 基本逻辑运算符定义    逻辑与、逻辑或、蕴涵、相等,逻辑非用not函数,逻辑与用&&函数,逻辑或用||,蕴涵函数定义一个操作符“==>”,然后定义相等操作符“”。(==>)::Bool->Bool->BoolTrue==>p =pFalse==>p =True()::Bool->Bool->Boolxy=x==y加载程序后测试

2013-05-28 17:14:01 2094

原创 数学之路(3)-数据分析(1)

数据分析 数据是事实,也称观测值,是实验、测量、观察、调查等的结果,常以数量的形式给出。数据分析的目的是把隐没在一大批看来杂乱无章的数据中的信息集中、萃取和提炼出来,以找出所研究对象的内在规律。在实用中,数据分析可帮助人们作出判断,以便采取适当行动。数据分析是组织有目的地收集数据、分析数据,使之成为信息的过程。 一、描述定性数据1、图形法Youxiangz.csv是2010年全

2013-05-27 22:57:59 2137

原创 haskell(31)

感谢大家的支持!haskell系列博文结束,与大家共勉~如果需要本博文完整的haskell教程及其代码共同交流进步,可以通过邮箱myhaspl@qq.com联系我。

2013-05-27 19:11:50 1488

原创 haskell(29)

24、定义类型1)Haskell使用Data语句定义数据类型定义一个3维向量数据类型data Vector3=Vector Float Float Float deriving(Show)verctorlen::Vector3->Floatverctorlen (Vector x y z)=sqrt (x^2+y^2+z^2)并定义长度函数verctorlen*Main

2013-05-25 15:46:49 1838

原创 haskell(28)

24、Data.Set Set介于列表和映射之间,所有的元素唯一。fromList构造Set。Prelude Data.Set> let x=Data.Set.fromList [11,22,33,44,55]Prelude Data.Set> let y=Data.Set.fromList [91,32,33,44,55]Prelude Data.Set> Interse

2013-05-24 17:22:00 1624

原创 haskell(27)

23、Data.Map关联列表可理解为字典,是按照键值对排列而没有特定顺序的一种List。Prelude> let myphones=[("zhangsang",28)]Prelude> let myphones=[("zhangsang",28),("lisi",22),("wangwu",33)] fromlist函数接收一个关联列表然后返回一个关联列表对应的map(映射)。

2013-05-24 16:30:15 1629

原创 数学之路(2)-数据分析-R基础(26)

(3)不定数量的函数参数> mycount+ temp=0+ for (i in c(...)){+ temp=temp+1+ }+ temp+ }> mycount(11,22,33)[1] 3> mycount(11,22,33,66)[1] 4> mycount(11,22,66)[1] 3> (4)内嵌函数允许在函数内定义函数

2013-05-23 11:27:32 1903

原创 haskell(26)

22、Data.CharData.Char模块中含有一系列用于对字符进行判断的函数,函数的类型全部声明为Char -> Bool。isControl 判断一个字符是否是控制字符. isSpace 判断一个字符是否是空格字符, 包括空格, tab, 换行符等.isLower 判断一个字符是否为小写.isUper 判断一个字符是否为大写. isAlpha 判断一个字符是否为字母

2013-05-22 16:52:30 1631

原创 数学之路(2)-数据分析-R基础(25)

19)定义函数与操作符有限维空间中,已知向量的坐标,就可以知道它的模长。我们定义一个求3维向量模长的函数:> vector_length+ vlength+ vlength+ }> vector_length(12,33,19)[1] 39.92493> 本博客所有内容是原创,未经书面许可,严禁任何形式的转载。ttp:

2013-05-22 15:55:53 1387

原创 数学之路(2)-数据分析-R基础(24)

19)R条件、循环语句可以使用for做为循环:> z> x> y> for (i in 1:length(x)){+ z[i]=x[i]^2+y[i]^2+ }> z [1] 122 148 178 212 250 292 338 388 442 500使用while做为循环语句> x> i=1> while (x[i]^2+ {+ i=

2013-05-22 15:25:23 1338

原创 数学之路(2)-数据分析-R基础(23)

19)分析数据集接上篇博文~继续以全球近一周地震数据为例。我们先将变量放到搜索路径上> attach(earthquake)先分析一下地震震深:> summary(Depth)   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's    0.10    5.80   12.15   30.82   38.0

2013-05-22 10:03:59 2622

原创 数学之路(2)-数据分析-R基础(22)

19)read.table和scan读取文件read.table比scan更强大,在文件有文件头的情况下,指定header=TRUE可以将文件头做为变量名。> read.table("h:/my_docs/eqweek.csv",header=TRUE,sep=",")->earthquake> earthquake     DateTime.Latitude.Longitude.De

2013-05-22 09:21:43 1806

原创 数学之路(2)-数据分析-R基础(21)

18)list函数生成一个对象,这个对象可拥有自定义的组件,组件也可拥有自定义的属性> list(name="students",class="101",stdt.ages=c(22,25,20),stdt.name=c("zhangsang","lisi","wangwu"))->mystudents> mystudents$name[1] "students"$clas

2013-05-21 16:58:41 1481

原创 haskell(25)

lines和unlines将带有换行符的串分解成多行,每行一个元素,unlines是相反的操作,将多个元素合成一个串。*Main Data.List> lines "hello\nworld"["hello","world"]*Main Data.List> unlines ["hello","world"]"hello\nworld\n"*Main Data.List>

2013-05-21 11:54:48 1586

原创 数学之路(2)-数据分析-R基础(20)

我们来看一个综合的例子,求出下面样本的数字在某区间内的分布数量,即求因子频率。下面是美国地震台网公布的全球2013年5月20日22点到24点的所有发生的地震的震级。2013-05-20T23:57:12.000+00:001.62013-05-20T23:57:12.000+00:000.92013-05-20T2

2013-05-21 11:48:04 1920

原创 haskell(24)

elemIndex和elemIndices在列表中查找元素,elemIndex返回找到的第一个元素的位置,而elemIndices返回找到的所有元素的位置。 Prelude Data.List> 66 `elemIndex` [1,23,66,2,6,90]Just 2Prelude Data.List> 23 `elemIndex` [1,23,66,23,6,90]Just 1

2013-05-21 10:22:35 1524

原创 haskell(23)

group将邻接相同的元素组合成列表的一个元素Prelude Data.List> group [12,12,12,32,12,12,11,12,23][[12,12,12],[32],[12,12],[11],[12],[23]]sort可对列表元素进行排序Prelude> :m + Data.ListPrelude Data.List> sort [23,55,32,11]

2013-05-20 16:28:19 1568

原创 haskell(22)

Concatmap先完成map,然后再完成concat操作:Prelude> concatMap (replicate 3) [1,2,3,4] [1,1,1,2,2,2,3,3,3,4,4,4]and和or对列表中的参数做逻辑与和逻辑或的操作Prelude> and $map odd [1,234,23,55,33,90]FalsePrelude> or $map odd

2013-05-20 11:52:36 1419

原创 数学之路(2)-数据分析-R基础(19)

16)矩阵与向量连接对于向量,Cbind将行转变为列进行连接,而rbind将列转变为行进行连接。> x2> x1> cbind(x1,x2)      x1  x2 [1,]  1 101 [2,]  2 102 [3,]  3 103 [4,]  4 104 [5,]  5 105 [6,]  6 101 [7,]  7 102 [8,]  8

2013-05-19 13:58:15 1478

原创 haskell(21)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u010255642Scanl1、scanr1与foldl1、foldr1类似,读取第一个元素,然后以第二个元素为起始元素,scanl1从左边开始,scanr1从右边开始。 *Main> scanl1 (\mmin x->if x[61,53,53,28]18、函数应用

2013-05-17 16:45:44 1662

原创 haskell(20)

18、map和filterMap将函数操作应用在随后的列表中,filter根据第一个参数为条件对随后的列表进行过滤Prelude> map (>5) [1,6,8,-1,10][False,True,True,False,True]Prelude> map (+6) [1,6,8,-1,10][7,12,14,5,16]Prelude> map (/6) [1,6,8,-1

2013-05-15 21:29:27 1782

原创 haskell(19)

14、高阶函数 高阶函数可以接受另一个函数作为参数,也可以把一个函数作为结果来返回。我们构造2个函数:1、mycct1,将列表中的元素累加或累减,具体取决于做为第一个参数的函数是(+)还是(-)------mycct1 ::(Num a)=>(a->a->a)->[a]->amycct1 f []=0mycct1 f (x:xs)=f x (mycct1 f xs)

2013-05-15 16:25:50 1451

原创 haskell(18)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u01025564214、递归在haskell中没有for、loop、while之类的语句,而是采用递归来替代循环。递归函数是指一些会在函数内调用自己的函数,我们写一个求列表中最小数的函数 mymin::(Ord a)=>[a]->amymin []=error "em

2013-05-14 15:24:59 1639

原创 数学之路(2)-数据分析-R基础(17)

13)奇异分解M的奇异值分解 :M=UDV',其中U'U=V'V=I。V的列(columns)组成一套对的正交"输入"或"分析"的基向量,是x的左奇异矩阵。U的列(columns)组成一套对的正交"输出"的基向量,是x的右奇异矩阵。D返回一个向量,向量的元素是对角线上的元素。Svd函数完成奇异分解> array(c(1:16),dim=c(4,4))->a> a     [,1

2013-05-11 22:51:02 1477

原创 数学之路(2)-数据分析-R基础(18)

目标是这些点到这条直线的距离的平方和最小,可运用最小二乘法,最小二乘法拟合的过程就是回归,这条直线就是回归线。Lsfit()函数完成最小二乘法拟合,其主要参数为:X:一个矩阵的行对应的情况和其列对应为变量。Y:结果,可以是一个矩阵,如果你想,以适应多种左手侧。Wt:可选参数,加权最小二乘法的执行权重向量。Intercept:是否应使用截距项。Tolerance:公差

2013-05-11 14:53:58 2219

原创 haskell(17)

下面是一个2维向量长度比较的例子vlencompare::(RealFloat a)=>(a,a)->(a,a)->Ordering(x1,y1) `vlencompare` (x2,y2) |(sqrt (x1^2+y1^2)) == (sqrt (x2^2+y2^2)) =EQ |(sqrt (x1^2+y1^2)) > (sqrt (x2^2+y2^2)) =G

2013-05-08 11:55:59 1490

原创 haskell(16)

------------------equation_slove ::(RealFloat a)=>a->a->a->(Complex a,Complex a)equation_slove numa numb numc |numb^2-4*numa*numc >0 = ((((-numb) + sqrt (numb^2-4*numa*numc))/(2*numa)):+0,((-numb)

2013-05-07 17:00:49 1589

原创 haskell(15)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u01025564212、守卫(guards)模式匹配针对的是确定值,而守卫(guards)则测试值的特性是true还是false,守卫更适合需要对参数运用复杂的条件表达式情况。numtest ::(Num a,Ord a)=>a->Stringnumtest tes

2013-05-07 17:00:03 1955

原创 haskell(14)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u0102556422)应用A.求3元素元组的第一、第二、第三个值myfirst ::(a,b,c)->amyfst (a,_,_)->amycnt (_,b,_)->bmylst (_,_,c)->cB、 求2维和3维空间的欧氏距离2维的欧氏距离公式是

2013-05-06 16:59:31 1623

原创 haskell(13)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u010255642我们来看一个匹配失败的例子,定义一个函数,返回某学生的性别: --pattern matchingyourname "zhangsan"="he is boy."yourname "wanghua"="she is girl."yourname

2013-05-06 11:58:14 1423

原创 haskell(12)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u01025564211、模式匹配模式匹配主要用来定义一些数据必须遵循的规则,根据他们来解析数据。在定义函数的时候,可以为不同的模式定义不同的函数体。我们在mytest.hs中定义一个函数mynum,为不同的参数定义不同的实现--pattern matchingmy

2013-05-06 11:52:13 1373

原创 haskell(11)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u010255642另外还有一些类型类:Enum定义了规则序列类型中的操作。Prelude> :t succsucc :: Enum a => a -> aPrelude> succ 'd''e'Prelude> :t [1..6][1..6] :: (

2013-05-06 08:08:47 1421

原创 haskell(10)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u010255642我们继续看几个类型类,猜测一下用途Prelude> :t (>=)(>=) :: Ord a => a -> a -> Bool这个用途比较明显,比较大小,a -> a 说明比较的类型得一致,最后的Bool表示然后返回一个Bool型,Ord是类型类,

2013-05-04 22:30:12 1453

原创 haskell(9)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u01025564210、类型1)初识类型Haskell是静态类型系统,在编译器就已经确定,这样更利于生成安全的代码,每个表达式都有类型,使用:t取得某表达式的类型Prelude> :t (124,"124")(124,"124") :: Num t =>

2013-05-03 22:06:15 1399

原创 haskell(8)

本博客所有内容是原创,未经书面许可,严禁任何形式的转载。http://blog.csdn.net/u0102556428、元组元组和列表相似,但不同的是元组内的元素类型不要求一致,而且元素个数是确定的。使用双重列表可以解决不定长多维数组的构造需要*Main> let myarray1=[[1,2],[3,4,5],[5,6,7,8]]*Main> let m

2013-05-02 22:07:22 1550

freeglut-MinGW-2.8.1-1.mp.zip

freeglut-MinGW-2.8.1-1.mp.zip freeglut的预编译包,codeblock必备

2014-02-03

机器学习数学基础

机器学习的数学基础,适合机器学习和人工智能的相关学习者

2013-08-30

python处理声音示例程序

python处理声音示例程序,博客用:http://blog.csdn.net/myhaspl

2013-08-26

haskell中文入门资料

haskell中文入门资料,代码齐全,入门简单

2013-08-20

python线性神经网络库mplannliner

python线性神经网络库,简单易用,提供图形函数 调用代码如下: traindata2=[[[9,25,30],-1],[[5,8,12],-1],[[15,31,49],-1],[[35,62,108],-1],[[19,40,60],-1],[[28,65,98],1],[[20,59,72],1],[[9,41,38],1],[[12,60,46],1],[[2,37,18],1]] myann2=nplann.Mplannliner() myann2.samples_init(traindata2) myann2.train() myc=myann2.simulate([35,68,110]) print "[35,68,110]" if myc=="+": print u"正类" else: print u"负类"

2013-07-25

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除