在rstudio中的ioslides中的persp3d未显示

时间:2015-07-31 12:25:16

标签: charts 3d rstudio

是否可以在RStudio中将persp3d图表输入ioslides演示文稿?我使用下面的代码绘制了年龄和年份的对数死亡率,但没有显示图表。

生成幻灯片外部的图表。如果可能的话,我想在演示文稿中有一个交互式图表。

```{R, echo = FALSE}
library(rgl)
library(demography)

# get data
plDemo<-hmd.mx("POL", username=username, password=password)

qxt <- log(plDemo$rate[[3]])
years <- plDemo$year
ages<- plDemo$age

persp3d(ages[0:100], years, qxt[0:100,], col="skyblue", shade=TRUE,xlab="Ages (0-100)",
    ylab="Years",zlab="Mortality rate (log)")
```

提前感谢您的帮助。

1 个答案:

答案 0 :(得分:0)

最后我找到了答案:

<?php
    $query = "SELECT * FROM daily WHERE date BETWEEN '2016-03-13' AND '2016-03-19'";
    $selected_result = mysqli_query($connection, $query);
?>
<table>
<? php
       while($row = mysqli_fetch_assoc($selected_result)) {
            $daily_id = $row['daily_id'];
            $date = $row['date'];
            $class_id = $row['class_id'];
            $student_id = $row['student_id'];
            $amount1 = $row['amount1'];
            $amount2 = $row['amount2'];
            $is_done = $row['is_done'];
 ?>
                 <tr>
                    <td><?php echo $daily_id; ?></td>
                    <td><?php echo $date; ?></td>
                    <td><?php echo $student_id; ?></td>
                    <td><?php echo $class_id; ?></td>
                    <td><?php echo $amount1; ?></td>
                    <td><?php echo $amount2; ?></td>
                    <td><?php echo $is_done; ?></td>
                </tr>
<?php
    } // closing the while loop
  ?>
</table>