如何使用Shiny导入并展示.mat文件中的数据

一、前置准备 #

• 安装依赖R包，需要用到Shiny做应用框架、R.matlab读取常规版本.mat文件、DT做交互式数据展示，安装命令：
  install.packages(c("shiny", "R.matlab", "DT"))

如果你要读取的是Matlab v7.3及以上版本存储的HDF5格式.mat文件，需要额外安装hdf5r包替换R.matlab做读取，接口逻辑基本一致。

• 提前确认本地.mat文件内存储的变量名、数据维度、存储版本，避免后续读取格式报错。

二、核心实现逻辑 #

.mat文件通过对应R包读取后会生成R列表对象，列表内每个元素对应Matlab文件中存储的一个变量，只需要把列表内的目标变量转换成R语言可展示的数据框格式，即可接入Shiny的渲染体系完成展示，常见分为两种使用场景：

• 场景1：.mat文件固定存放在Shiny应用目录内，应用启动时直接读取
• 场景2：支持用户在应用页面动态上传.mat文件，读取后即时展示

三、完整可运行示例 #

以下代码覆盖动态上传、变量选择、数据信息展示、交互式表格渲染的全流程，如果是固定读取本地文件，只需要按照代码内注释替换读取路径、移除上传控件即可：

library(shiny)
library(R.matlab)
library(DT)

ui <- fluidPage(
  titlePanel(".mat文件数据展示工具"),
  sidebarLayout(
    sidebarPanel(
      # 固定读取本地文件时注释掉以下上传控件
      fileInput("mat_upload", "选择.mat文件上传", accept = ".mat"),
      # 变量选择下拉框，自动读取mat内所有有效变量
      uiOutput("var_picker")
    ),
    mainPanel(
      # 展示数据维度信息
      textOutput("dim_info"),
      # 交互式数据表格
      DTOutput("data_show")
    )
  )
)

server <- function(input, output) {
  # 读取mat文件的响应式对象
  mat_source <- reactive({
    # 固定读取本地文件时启用下行代码，替换为你的文件实际路径
    # readMat("./your_data_file.mat")
    
    # 动态上传场景的读取逻辑
    req(input$mat_upload)
    readMat(input$mat_upload$datapath)
  })
  
  # 渲染变量选择器，自动过滤Matlab生成的隐藏系统变量
  output$var_picker <- renderUI({
    req(mat_source())
    valid_vars <- names(mat_source())[!startsWith(names(mat_source()), ".")]
    selectInput("target_var", "选择要查看的变量", choices = valid_vars)
  })
  
  # 处理选中变量为可展示的数据框格式
  clean_data <- reactive({
    req(mat_source(), input$target_var)
    raw <- mat_source()[[input$target_var]]
    # 高维数组默认取第一个二维切片展示，可根据业务需求自定义切片逻辑
    if (length(dim(raw)) > 2) {
      raw <- as.data.frame(raw[,,1])
    } else {
      raw <- as.data.frame(raw)
    }
    raw
  })
  
  # 输出数据维度信息
  output$dim_info <- renderText({
    req(clean_data())
    d <- dim(clean_data())
    sprintf("当前展示数据规格：%s行，%s列", d[1], d[2])
  })
  
  # 渲染交互式表格，开启横向滚动适配宽表
  output$data_show <- renderDT({
    req(clean_data())
    datatable(clean_data(), options = list(pageLength = 15, scrollX = TRUE))
  })
}

# 启动应用
shinyApp(ui, server)

四、注意事项 #

• 如果读取v7.3版本的.mat文件报错，把R.matlab的readMat函数替换为hdf5r包的H5File读取接口即可，后续数据处理逻辑完全通用
• 若文件内存储的是高维数组、结构体等非二维表数据，需要在clean_data响应式环节增加切片、字段展开的自定义逻辑，转换成二维表后再渲染
• 单表数据量超过10万行时建议开启服务端分页，避免前端渲染卡顿
• 不要把.mat文件放在Shiny应用的www目录外的可访问路径，避免源文件被直接下载泄露

内容的提问来源于stack exchange，提问作者jack1598