内容的栏目 * @param int $category 0列表 1频道 2单页 3外链 * @return array */ function category_list($forumlist, $model = 0, $display = 0, $category = 0) { if (empty($forumlist)) return NULL; static $cache = array(); $key = $model . '-' . $display . '-' . $category; if (isset($cache[$key])) return $cache[$key]; if ($display) { foreach ($forumlist as $k => $val) { if (1 == $val['display'] && 1 == $val['type'] && $val['category'] == $category) { $cache[$key][$k] = $val; } } } else { foreach ($forumlist as $k => $val) { if (1 == $val['type'] && $val['category'] == $category) { $cache[$key][$k] = $val; } } } return empty($cache[$key]) ? NULL : $cache[$key]; } /** * @param $forumlist 所有版块列表 不分模型 * @param int $display 0全部CMS栏目 1在首页和频道显示内容的栏目 * @param int $category 0列表 1频道 2单页 3外链 * @return array */ function category_list_show($forumlist, $display = 0, $category = 0) { if (empty($forumlist)) return NULL; static $cache = array(); $key = $display . '-' . $category; if (isset($cache[$key])) return $cache[$key]; if ($display) { foreach ($forumlist as $k => $val) { if (1 == $val['display'] && 1 == $val['type'] && $val['category'] == $category) { $cache[$key][$k] = $val; } } } else { foreach ($forumlist as $k => $val) { if (1 == $val['type'] && $val['category'] == $category) { $cache[$key][$k] = $val; } } } return empty($cache[$key]) ? NULL : $cache[$key]; } /** * @param $forumlist 所有版块列表 * @return mixed BBS栏目数据(仅列表) 尚未开放bbs频道功能 */ function forum_list($forumlist) { if (empty($forumlist)) return array(); static $cache = array(); if (isset($cache['bbs_forum_list'])) return $cache['bbs_forum_list']; $cache['bbs_forum_list'] = array(); foreach ($forumlist as $_fid => $_forum) { if ($_forum['type']) continue; $cache['bbs_forum_list'][$_fid] = $_forum; } return $cache['bbs_forum_list']; } // 导航显示的版块 function nav_list($forumlist) { if (empty($forumlist)) return NULL; static $cache = array(); if (isset($cache['nav_list'])) return $cache['nav_list']; foreach ($forumlist as $fid => $forum) { if (0 == $forum['nav_display']) { unset($forumlist[$fid]); } } return $cache['nav_list'] = $forumlist; } ?>R以及Rstudio的安装（Windows）

科技改变生活-雨落星辰 - 所有的伟大,都源于一个勇敢的开始

    最新消息：雨落星辰是一个专注网站SEO优化、网站SEO诊断、搜索引擎研究、网络营销推广、网站策划运营及站长类的自媒体原创博客
    你的位置： 首页>运维笔记>R以及Rstudio的安装（Windows）

    R以及Rstudio的安装（Windows）

    运维笔记admin10浏览0评论

    前言：本安装教程主要服务于天津中医药大学医学统计课程的R语言学习小组

    一、 前期准备

    文件地址
    链接: https://pan.baidu/s/1r8f5Xc7VM_XLExtV4jnnPA 提取码: zeb5 复制这段内容后打开百度网盘手机App，操作更方便哦
    文件内容

    二、安装步骤

    首先，我们在非系统盘，新建两个文件夹，一个R一个Rstudio，防止系统盘过大导致电脑卡顿。

    （1）R的安装

    双击文件R-4.1.1-win.exe

    点击确定

    点击下一步

    选中自己新建的R文件夹

    根据自己电脑选择是32位还是64位

    点击下一步



    R安装完成
    测试代码

    print("Hello World!")


    输入测试代码，点击回车，可以发现Hello World!被打印出来，测试成功。

    （2）Rstudio的安装

    双击安装包


    选择刚才新建的Rstudio文件夹


    安装完成

    点击左下角的windows，可以在最近添加找到新安装的软件。

    三、外观设置



    更改配置，选择适合自己的字体大小和主题配色

    四、练习代码

    # 数据准备
info = c(1, 2, 4, 8)

# 命名
names = c("Google", "Runoob", "Taobao", "Weibo")

# 涂色（可选）
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")

# 绘图
pie(info, labels=names, col=cols)

    新建一个r script，将代码复制进去，点击run

    点击三次Run之后，代码逐行执行完成，可得到最终运行结果

    到这里，你已经完成初识R语言的第一步了，喜欢的点个赞

    继续浏览有关 的文章

    与本文相关的文章

    发布评论

    评论列表(0)

    1. 暂无评论