小编Jd *_*aba的帖子

我想在linux上编译OPENMP fortran代码.我有大约230个子程序.我用来编译代码的代码如下:1)首先,我使用以下命令编译每个子例程

ifort -c -override-limits -openmp *.for

然后所有子程序现在都有一个单独的目标文件.

2)然后我尝试通过以下命令将目标文件编译为可执行文件

ifort *.o -o myprogram

我收到以下错误:

WINDWAVE.F90:(.text+0x1c9d): undefined reference to `__kmpc_global_thread_num'
WINDWAVE.F90:(.text+0x1cb0): undefined reference to `__kmpc_ok_to_fork'
WINDWAVE.F90:(.text+0x1eea): undefined reference to `__kmpc_fork_call'
WINDWAVE.F90:(.text+0x1f09): undefined reference to `__kmpc_serialized_parallel'
WINDWAVE.F90:(.text+0x214b): undefined reference to `__kmpc_end_serialized_parallel'
WINDWAVE.F90:(.text+0x2427): undefined reference to `__kmpc_for_static_init_4' 
WINDWAVE.F90:(.text+0x29c7): undefined reference to `__kmpc_for_static_fini'
WINDWAVE.F90:(.text+0x29da): undefined reference to `__kmpc_barrier'
WINDWAVE.F90:(.text+0x2a50): undefined reference to `__kmpc_for_static_init_4'
WINDWAVE.F90:(.text+0x3773): undefined reference to `__kmpc_for_static_fini'
WINDWAVE.F90:(.text+0x3786): undefined reference to `__kmpc_barrier'
WINDWAVE.F90:(.text+0x37fc): undefined reference to `__kmpc_for_static_init_4'
WINDWAVE.F90:(.text+0x4a58): undefined reference to `__kmpc_for_static_fini'
WINDWAVE.F90:(.text+0x4a6b): …

嗨,我想从premierleague网站上提取表格.

我使用的rvest包是 包,我在初始阶段使用的代码如下:

library(rvest)
library(magrittr)
premierleague <- read_html("https://fantasy.premierleague.com/a/entry/767830/history")
premierleague %>% html_nodes("ism-table")

我找不到一个可以解压缩html_nodesfor rvest包的html标签.

我使用类似的方法从" http://admissions.calpoly.edu/prospective/profile.html "中提取数据,我能够提取数据.我用于calpoly的代码如下:

library(rvest)
library(magrittr)
CPadmissions <- read_html("http://admissions.calpoly.edu/prospective/profile.html")

CPadmissions %>% html_nodes("table") %>%
  .[[1]] %>%
  html_table()

通过以下链接从youtube获取上述代码:https://www.youtube.com/watch？v = gSbuwYdNYLM&ab_channel = EvanO%27Brien

任何有关从fantasy.premierleague.com获取数据的帮助都非常感谢.我需要使用某种API吗？

我有一个数据集,其中有5列.在一列中有日期,在第二列中有表面数据,在第3列底部,在第4列和第5列中.

例如,我有一个简单的数据如下:

         Date   Surface Bottom  id  diff
250.0416718 17.49998283 17.50068474 apple   0.00070191
250.0833282 17.50042152 17.50049591 apple   7.44E-05
250.125 17.50060844 17.50074196 apple   0.00013352
250.1666718 17.50083923 17.50092125 apple   8.20E-05
250.2083282 17.50104713 17.50112343 apple   7.63E-05
250.25  17.50044441 17.50311279 apple   0.00266838
250.2916718 17.50193024 17.50263214 apple   0.0007019
250.3333282 17.50139427 17.50404167 apple   0.0026474
250.375 17.50112724 17.50495529 apple   0.00382805
250.4166718 17.50050163 17.50526428 apple   0.00476265
250.4583282 17.4996891  17.5043335  apple   0.0046444
250.5   17.50051117 17.50292969 apple   0.00241852
250.5416718 17.50112534 17.50325584 apple   0.0021305
250.5833282 17.50115585 17.50579262 apple   0.00463677
250.625 17.49997902 17.51161766 …

我有这个代码:

num = range(1,33)
num[0]=1
num[1]=2
for i in range(2,32):
    num[i]=num[i-1]+num[i-2]


total=0
for i in range(0,32):
    print num[i]
    if num[i]%2==0:
    total=total+num[i]
    else:
    num[i]=num[i+1]

我想找到num数组中偶数的总和.任何人都可以建议我在这里做错了吗？

我有如下数据:

nnn <- structure(list(JulDay = c(260.0208435, 260.0416565, 260.0625, 
260.0833435, 260.1041565, 260.125), i46j8k1 = c(17.99964905, 
18.5903511, 22.93223381, 25.75687981, 25.78559113, 25.8169651
), i47j8k1 = c(18.36571884, 21.15985107, 24.80698013, 25.75730324, 
25.78366089, 25.65381622), i48j8k1 = c(18.45543289, 22.02331543, 
24.99463654, 25.5712738, 25.64232635, 25.66119385), i46j8k2 = c(17.99798965, 
18.60897827, 22.95389748, 25.75719261, 25.78653336, 25.81692505
), i47j8k2 = c(18.36762619, 21.17233467, 24.82248497, 25.75767899, 
25.7840023, 25.64115906), i48j8k2 = c(18.45938683, 22.04619026, 
24.9859066, 25.56440544, 25.63998032, 25.66089439), i46j8k3 = c(17.99430084, 
17.92090797, 19.67384911, 21.70389938, 23.67287827, 24.04380417
), i47j8k3 = c(18.36631203, 19.82550049, 21.42166328, 23.76496887, 
24.87460899, 25.41026688), i48j8k3 = …