I can see the following problems in your code:

1. read.file() needs to be replaced with read_csv() or read.csv() based on the libraries being used in the code.
2. print() function is missing - if you directly use omega (you may not be able to see the results always. use print(omega(my.data)).

Corrections:

1. my.data <- read_csv("path/to/your_file.csv")

2. print(omega(my.data))

Try this and see it that works.