什么是相当于R中这些行的PHP?

时间:2012-05-16 19:33:42

标签: php r

我正在尝试将一个脚本从R移植到PHP中,但不确定第3行和第4行(taken from the larger function discussed here)正在做什么。看起来像逻辑操作和数组定义同时。有人可以给我相当于PHP的东西吗?

cosAzPos <- (0 <= sin(dec) - sin(el) * sin(lat))
sinAzNeg <- (sin(az) < 0)
az[cosAzPos & sinAzNeg] <- az[cosAzPos & sinAzNeg] + twopi
az[!cosAzPos] <- pi - az[!cosAzPos]

1 个答案:

答案 0 :(得分:2)

我觉得它看起来像是:

if (0 < sin($dec) - sin($el) * sin($lat)) {
  if(sin($az) < 0)
    $az = $az + $twopi;
} 
else {
  $az = $pi - $az;
}

仅适用于第3-4行:

if ($cosAzPos && $sinAzNeg) {
  $az = $az + $twopi;
}
elseif (!$cosAzPos) {
  $az = $pi - $az;
}
else {
  // leave $az value
}

根据我在参考文章中找到的commet。但我不确定在float

中访问索引