How calculate total in a table function

[Hantesfa1]

I am doing frequency using the table function and wanted to know if I can total in the code?
How can I code it to Calculate total in the table function?

[nirgrahamuk]

a_vec <- c(1:5,5:3)
table(a_vec)
sum(a_vec)

[Hantesfa1]

Thank you! How about if I want to calculate the total by rows and columns. How can I do in the table function?

[nirgrahamuk]

please give an example

[Hantesfa1]

Here is an example. I created this frequency using the table function. And I want to add total for each rows and columns and sum total in the output.

        A.            B.               Total
        1268       26895            ?
        467          462                 ?

Total ? ? ?

[technocrat]

d <- data.frame(A = c(1268,467), 
                B = c(26895,462),
                Total = c(NA,NA))

d$Total = rowSums(d[1:2])
d
#>      A     B Total
#> 1 1268 26895 28163
#> 2  467   462   929

^{Created on 2023-02-25 with reprex v2.0.2}

[jrkrideau]

d$Total = rowSums(d, na.rm = TRUE)