How to add cluster name to metadata in Seurat?

To add the column status can try the following:

B@meta.data$status <- status[row.names(B@meta.data),]$status

To rename the clusters you can try the following:

B@meta.data$seurat_clusters <- B@meta.data$status

However, I think the plotting functions in Seurat do not use the cluster information from B@meta.data, rather they use information from B@active.idents. So, I guess you have to do the following instead:

B@active.idents <-  B@meta.data$status

This should work, but, I will verify and update this answer later.