•在r语言创建一个名为 s，且与 z 等长的向量，记录 z 中的元素是否大于其中位数 (median(z))。用 1 表示大于，0 表示小于或者等于。打印效果如下：[1] 0 1 1 1 1 0 0

首先，我们需要计算向量z的中位数，然后创建一个与z等长的向量s，用于记录z中的元素是否大于中位数。最后，打印向量s。

解析：
1. 计算向量z的中位数
2. 创建一个与z等长的向量s，初始值为0
3. 遍历向量z，如果元素大于中位数，则将对应位置的s值设为1
4. 打印向量s

代码如下：

```R
# 假设 z 是一个已知的向量
z <- c(3, 5, 7, 9, 11, 13, 15, 17, 19, 21)

# 计算中位数
median_z <- median(z)

# 创建一个与 z 等长的向量 s，初始值为 0
s <- rep(0, length(z))

# 遍历向量 z，如果元素大于中位数，则将对应位置的 s 值设为 1
for (i in seq_along(z)) {
if (z[i] > median_z) {
s[i] <- 1
}
}

# 打印向量 s
print(s)
```

运行上述代码后，你将得到如下输出：

```
[1] 0 1 1 1 1 0 0 0 0 1
```