如何在R-markdown中用cases展示线性方程组并动态生成？

Great questions! Let's tackle them one by one:

In R Markdown, you can directly embed LaTeX code to render systems of linear equations with a curly bracket. The cases environment from LaTeX is perfect for this—it automatically adds the left curly bracket and aligns each equation properly.

Here's a basic example:
$$
\begin{cases}
2x + 5y - 2z + 2p = 9 \
3x - 2y + z - 3p = 34 \
-3x + 3y + 2z + 4p = 33 \
2x + 3y + 4z + 5p = 125
\end{cases}
$$

If you want all the equals signs to line up neatly (for better readability), add an & before each = to create alignment points:
$$
\begin{cases}
2x + 5y - 2z + 2p & = 9 \
3x - 2y + z - 3p & = 34 \
-3x + 3y + 2z + 4p & = 33 \
2x + 3y + 4z + 5p & = 125
\end{cases}
$$

Just wrap the entire LaTeX block in double dollar signs ($$) to render it as display math in your R Markdown document.

To make your system update automatically when you modify the zad string, you can write a small R function to parse the string, generate the corresponding LaTeX code, and render it directly in your document.

Here's a step-by-step solution:

First, create an R code chunk with results='asis' (this tells R Markdown to render the output as raw LaTeX instead of plain text):

{r, results='asis'}
# Define your equation string
zad <- "2x+5y-2z+2p=9; 3x-2y+1z-3p=34; -3x+3y+2z+4p=33; 2x+3y+4z+5p=125"

# Function to convert string to LaTeX cases environment
generate_equation_system <- function(equation_str) {
  # Split the string into individual equations (handles optional spaces after semicolons)
  equations <- strsplit(equation_str, ";\\s*")[[1]]
  
  # Add alignment markers to line up equals signs
  aligned_equations <- gsub("=", " &= ", equations)
  
  # Combine equations into the cases environment content
  cases_body <- paste(aligned_equations, collapse = " \\\\ ")
  
  # Build the full LaTeX code
  latex_output <- paste0("$$\\begin{cases}", cases_body, "\\end{cases}$$")
  
  # Print the LaTeX code (cat ensures it's rendered correctly)
  cat(latex_output)
}

# Generate and render the system
generate_equation_system(zad)

How it works: #

1. 字符串拆分: strsplit(equation_str, ";\\s*") 会以分号为分隔符拆分输入字符串，同时忽略分号后的任意空格（不管你写"; "还是";"都能正确识别）。
2. 等号对齐: gsub("=", " &= ", equations) 把每个=替换为&=，让LaTeX自动对齐所有等号，提升可读性。
3. LaTeX代码生成: 函数会把处理后的方程拼接成完整的cases环境代码，再包裹在$$中作为块级数学公式渲染。

现在，只要你修改zad字符串（比如调整方程、增减变量），重新运行代码块，渲染后的方程组就会自动更新。

举个例子，如果你把zad改成：

zad <- "x + y = 5; 2x - y = 1; 3x + 2y = 12"

输出会自动变成：
$$
\begin{cases}
x + y & = 5 \
2x - y & = 1 \
3x + 2y & = 12
\end{cases}
$$

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