以下是使用S3和S4编写的简单代码示例，以演示它们在Bioconductor软件包开发中的使用。

首先，我们将展示使用S3编写的代码示例：

# 创建一个S3类
create_s3_class <- function(x, y) {
  obj <- list(x = x, y = y)
  class(obj) <- "S3Class"
  return(obj)
}

# 定义一个S3泛型函数
s3_generic_function <- function(obj) {
  UseMethod("s3_generic_function")
}

# 为S3类添加方法
s3_generic_function.S3Class <- function(obj) {
  # 在这里添加适当的功能代码
  print(paste("S3 Class:", obj$x, obj$y))
}

# 使用S3类和泛型函数
s3_obj <- create_s3_class(10, 20)
s3_generic_function(s3_obj)

接下来，我们将展示使用S4编写的代码示例：

# 创建一个S4类
setClass("S4Class", representation(x="numeric", y="numeric"))

# 创建S4对象
s4_obj <- new("S4Class", x=10, y=20)

# 定义S4类的方法
setMethod("s4_generic_function", "S4Class", function(object) {
  # 在这里添加适当的功能代码
  print(paste("S4 Class:", object@x, object@y))
})

# 使用S4对象和方法
s4_generic_function(s4_obj)

这些示例展示了如何使用S3和S4创建类、定义方法，以及如何使用泛型函数调用这些方法。开发人员可以根据自己的需求选择使用S3还是S4来开发Bioconductor软件包。