隐函数画图 with R

这个函数 sin(xsiny)-cos(ycosx)=0 图是这个样子

怎么用R画出来呢？下面是代码

x<-y<-seq(-10,20,0.1)f<-function(x,y){sin(x*sin(y))-cos(y*cos(x))}z<-outer(x,y,f)contour(x,y,z)

用R画图结果展示

第二个办法

implicitplot<-function(f,xrange=seq(-10,20,length=1000),yrange=seq(-10,20,length=1000)){z<-outer(xrange,yrange,f)contour(xrange,yrange,z,levels=0,labels='',labcex=.0001)}f<-function(x,y){sin(x*sin(y))-cos(y*cos(x))}#f<-function(x,y) (x^2+y^2-1)^3-x^2*y^2 -(x^2*y^3)implicitplot(f)

转自
http://blog.csdn.net/liu7788414/article/details/44488215

转载于:https://www.cnblogs.com/xiaogang999/p/5897166.html

《新程序员》：云原生和全面数字化实践50位技术专家共同创作，文字、视频、音频交互阅读

总结

以上是生活随笔为你收集整理的隐函数画图with R的全部内容，希望文章能够帮你解决所遇到的问题。

如果觉得生活随笔网站内容还不错，欢迎将生活随笔推荐给好友。