使用Fortran画图

这个方法与Gnuplot不一样,只要调用这个Module就行,但是其实是代码自动调用的Python,所以电脑需要有Python环境。

首先它可以

 可以画以上的图,具体使用如一下例子作为参考:

    program main
    use,intrinsic :: iso_fortran_env, only: wp => real64
    use pyplot_module
    implicit none
    type(pyplot) :: plt
    real(wp),dimension(100) :: xx,yy
    real r
    
    integer i
    do i = 1,100
        xx(i) = i
        call RANDOM_NUMBER(r)
        yy(i) = r
    enddo
    
    call plt%initialize(grid=.true.)
    call plt%add_plot(xx,yy,label='res',linestyle='b-o',markersize=5,linewidth=2)
    call plt%savefig('res.png', pyfile='result.py')
    stop
    end program main

首先要,

use,intrinsic :: iso_fortran_env, only: wp => real64
use pyplot_module

然后对于你要画图的数组,要特别定义为

real(wp),dimension(100) :: xx,yy 即wp类型

如果代码没错误,执行代码后会跳出画图结果。如图所示:

 反正就是用起来很方便,直接调用Module就可以了。

我把这个Module也贴出来,我稍稍修改了一丢丢,他里面的一些画图格式设置会有警告,不会影响画图结果,放心,请从代码包中下载,免费的。

我还是贴一个网盘链接吧

Fortran画图Module   提取码:dsoc 
 

评论 6
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

空花缱绻三分

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值